I meant to post different values for the Number argument in the Rnd() function. I edited my post.
Perhaps you can explain what your question is again or state your goal by implementing the Rnd() function. When I use the Rnd function, I do not bother using a Number argument. I believe all that does is limit how big the random number returned can be. So the following two examples would be similar. The difference is that the second one produces results that are less predictable.
Code:
Dim dblMyDouble As Double
Randomize
dblMyDouble = Rnd(7)
MsgBox dblMyDouble
or
Code:
Dim dblMyDouble As Double
Randomize
dblMyDouble = (6 * Rnd()) + 1
MsgBox dblMyDouble