generate random numbers between 1 to 10 vba rnd()

**ihrktho** · 04-08-2014, 09:07 AM

Dear all,

I have a quick question and i would be very thankful if someone could help me.

I would like to generate randomly ten numbers in a row between 1 and 10.

For instance: 9,5,2,5,6,8,1,4,3, etc.

Please Login or Register  to view this content.

the above code give me numbers between 1 and 100, any idea on how I could limit the possible outcomes between 1 and 10

Thanks in advance for your time.

-Thomas

**StephenR** · 04-08-2014, 09:16 AM

Try this:

Please Login or Register  to view this content.

**JOHN H. DAVIS** · 04-08-2014, 09:21 AM

Maybe:

Please Login or Register  to view this content.

**ihrktho** · 04-08-2014, 09:25 AM

Thanks for your quick answer.

Your solution work well for rnd number between 1 and 10.

but would you know how to generate rnd number between 1 and 12?

**ihrktho** · 04-08-2014, 09:28 AM

Thanks John H Davis,

Your solution also works perfectly.

but I was also wondering how to do, if I am looking at random number between 1 and another number that is not a multiple of 10. for example number between 1 and 12.

Thanks again for your quick answer.

**Andy Pope** · 04-08-2014, 09:29 AM

perhaps take a look at the vba help on it's rnd function. It provides an example of getting a random number between to values.

Please Login or Register  to view this content.

**JOHN H. DAVIS** · 04-08-2014, 09:46 AM

I tested this and it appears to work.

Please Login or Register  to view this content.

**Andy Pope** · 04-08-2014, 09:59 AM

The use of this line to handle zero value will skew the output. Even if 10 was changed to 12 for this specific case.

Please Login or Register  to view this content.

Whether that's inmportant to the OP I don't know.

**JOHN H. DAVIS** · 04-08-2014, 10:03 AM

Thanks for pointing that out.

**protonLeah** · 04-08-2014, 08:23 PM

x = WorksheetFunction.RandBetween(1, 12)

**Sa DQ** · 04-08-2014, 11:21 PM

PHP Code:


Sub VietNam()
Dim X As Long
Dim RndnumberArray(1 To 10) As Integer

For X = 1 To 10
    RndnumberArray(X) = CInt(X * Rnd()) + 10 * X
    MsgBox RndnumberArray(X)
Next X
End Sub

**Andy Pope** · 04-09-2014, 03:32 AM

@Sa DQ,

Did you test your code?

This is the output I got from running it.

11
21
32
41
52
65
70
86
97
107

**ihrktho** · 04-09-2014, 09:51 AM

Thanks so much,

thanks to your help I understand that:
1) I could use the worksheet function: RandBetween.
2) Int((upperbound - lowerbound + 1) * Rnd + lowerbound)
3) RndnumberArray(X) = CInt(X * Rnd()) + 10 * X

Thanks again for your help,
Thomas.

generate random numbers between 1 to 10 vba rnd()

LinkBack

Thread Tools

Rate This Thread

Display

generate random numbers between 1 to 10 vba rnd()

Re: generate random numbers between 1 to 10 vba rnd()

Re: generate random numbers between 1 to 10 vba rnd()

Re: generate random numbers between 1 to 10 vba rnd()

Re: generate random numbers between 1 to 10 vba rnd()

Re: generate random numbers between 1 to 10 vba rnd()

Re: generate random numbers between 1 to 10 vba rnd()

Re: generate random numbers between 1 to 10 vba rnd()

Re: generate random numbers between 1 to 10 vba rnd()

Re: generate random numbers between 1 to 10 vba rnd()

Re: generate random numbers between 1 to 10 vba rnd()

Re: generate random numbers between 1 to 10 vba rnd()

Re: generate random numbers between 1 to 10 vba rnd()

Thread Information

Users Browsing this Thread

Similar Threads

Generate Random Numbers Between 0-9

[SOLVED] Generate Random numbers where sum = 1

[SOLVED] Generate Random Numbers

Using VBA to generate random numbers

Generate Random Numbers

Tags for this Thread

Bookmarks

Bookmarks

Posting Permissions