If your names are in col A:
In B, alongside each name, insert the formula
=RAND()
copy & paste special -> values to stop them recalculating and then sort the list based on this column
Your names should now be in a random order.
At least that's what I assume you're after, based on the thread title.
If you need VB to do this, you could try recording a macro whilst you do it yourself manually and then adapt the code to suit.