Hi Bernd,
Thanks for the response, this initially worked but after saving my work and
going back in I kept getting a #NAME? error whenever I tried to use it. It's
like the function isn't sticking in the VBA, I checked this and it is there
though. When it does work though, it is a beautiful thing.

Cheers
Boris

"Bernd Plumhoff" wrote:

I suggest to take my function UniqRandInt() from
http://www.sulprobil.com/html/uniqrandint.html
then select your 10 rows and 4 columns and enter
=INDEX(Sheet2!A1:A40,UniqRandInt(40,FALSE))
as array formula (press CTRL+ALT+RETURN and not only
RETURN to enter)

If you want your names to change with each new calculation
then change FALSE to TRUE.

HTH,
Bernd