Hello,
Array-enter into 10 adjacent vertical cells
=INDEX(A1:A10,uniqrandint(10))
or array-enter into 10 adjacent horizontal cells
=INDEX(A13:J13,1,uniqrandint(10))
for example.
My UDF UniqRandInt you will find he
http://www.sulprobil.com/html/uniqrandint.html
Regards,
Bernd