Hello,

I suggest to select a vertical range of 30 cells and to array-enter:
=RandInt(1,6,30,5)

Or select a horizontal range of 30 cells and array-enter:
=TRANSPOSE(RandInt(1,6,30,5))

My UDF RandInt you will find at
http://sulprobil.com/html/randint.html

With a sub calling my UDF you will have better control of
(re-)calculating the random numbers.

Regards,
Bernd