Hi all,

HYCH

I am using the code below to run a randomsier, but i would like to
randomly generate numbers from 1 to 128 and put them into cells in
column B ie

1st number generated into b1, 2nd number would then go into b2, 3rd
into b3 and so on, any help with the code for this, if it is possible

Random code using just to show a random number.


Sub RandomNo()
Randomize
MyNumber = Int((128 - 1 + 1) * Rnd + 1)

MsgBox ("Number Generated ") & (MyNumber)
Range("H8").Select
End Sub