randomizing vba

[andrewb90]

I have a code that ends with a message box. I would like to have that message box randomly choose a message each time the code is run instead of saying the same thing. For example, when the code is run, the VBA will choose from message A,B, or C and that code (which will just be a message box) will run.

Do this make sense, and is this doable?

Thanks,

 

[Rick Rothstein]

I have a code that ends with a message box. I would like to have that message box randomly choose a message each time the code is run instead of saying the same thing. For example, when the code is run, the VBA will choose from message A,B, or C and that code (which will just be a message box) will run.

Something like this should work...

' Put the following code line with your other Dim statements
Dim MSG As Variant
...
...
' Put this code where you want to display your random message
MSG = Array("This is your first message", "This would be the second message", "And here is the third message")
MsgBox MSG(Int((UBound(MSG) - LBound(MSG) + 1) * Rnd))

 

[andrewb90]

Like my message box says: "Wow Rick, You Rock! The code is error free!"

Thanks so much!!!