Hello Winston,

Select 5 adjacent cells and array-enter
=Random_Pick(A1:E10)
(enter with CTRL + SHIFT + ENTER, not only with ENTER)
if your source data is A1:E10.

My UDF Random_Pick you can get he
http://www.sulprobil.com/html/uniqrandint.html

You can include the macro as follows:
Press ALT + F11.
Insert a module.
Copy macro code from my website into your new module
(do not forget to include VBUniqRandInt code, too).
Go back to your worksheet.

Regards,
Bernd