Random number generator - vba

surkdidat

Active Member
Joined
Oct 1, 2011
Messages
361
I have found code online to generate a random number using VBA (on click of button)
How do I get it to display a certain cell (H5) rather than in a msgbx?

Code:
Sub random_num()

     'Initialize the random number generator
     '=> Randomize : add this before you call the Rnd function to obtain completely random values
     Randomize
     
     'Random whole number between 1 and 50 :
     random_number = Int(50 * Rnd) + 1
     
     MsgBox random_number
     
End Sub
 

Some videos you may like

Excel Facts

What is the fastest way to copy a formula?
If A2:A50000 contain data. Enter a formula in B2. Select B2. Double-click the Fill Handle and Excel will shoot the formula down to B50000.

Rick Rothstein

MrExcel MVP
Joined
Apr 18, 2011
Messages
36,314
Office Version
  1. 2010
Platform
  1. Windows
I have found code online to generate a random number using VBA (on click of button)
How do I get it to display a certain cell (H5) rather than in a msgbx?

Code:
Sub random_num()

     'Initialize the random number generator
     '=> Randomize : add this before you call the Rnd function to obtain completely random values
     Randomize
     
     'Random whole number between 1 and 50 :
     random_number = Int(50 * Rnd) + 1
     
     [B][COLOR="#FF0000"]MsgBox random_number[/COLOR][/B]
     
End Sub

Try changing the red highlighted line to this...

Range("H5").Value = random_number
 

Watch MrExcel Video

Forum statistics

Threads
1,109,070
Messages
5,526,609
Members
409,712
Latest member
lager2020

This Week's Hot Topics

Top