=INDIRECT("A"&INT(RAND()*5)+1)
=INDEX(A1:A5,RANDBETWEEN(1,5)) Excel 2007
=LOOKUP(RAND()*5,ROW(A1:A5)-1,A1:A5) OFFICE2003、2007通用。