How to Pick random cells to Userform

sbv1986

Board Regular
Joined
Nov 2, 2017
Messages
75
Hi all:

I have workbook with sheet(data).range(A1:A1000) as text

Now I want macro apper random cell in texbox when Userform.show
Please help me to do that, many thanks./.
 

Some videos you may like

Excel Facts

Excel Joke
Why can't spreadsheets drive cars? They crash too often!

mikerickson

MrExcel MVP
Joined
Jan 15, 2007
Messages
23,901
Code:
Private Sub Userform_Initialize()
    TextBox1.Text = Cells(WorkSheetFunction.RandBetween(1, 1000), 1).Text
End Sub
 

mikerickson

MrExcel MVP
Joined
Jan 15, 2007
Messages
23,901
Are all the cells in A1:A1000 filled? Or did was the randomly selected cell blank?
Is the worksheet in question the ActiveSheet? If not, what is the name of the sheet where the values are?
 
Last edited:

sbv1986

Board Regular
Joined
Nov 2, 2017
Messages
75
Are all the cells in A1:A1000 filled? Or did was the randomly selected cell blank?
Is the worksheet in question the ActiveSheet? If not, what is the name of the sheet where the values are?

Ah code worked when I change full path:
Code:
[COLOR=#333333]Private Sub Userform_Initialize()[/COLOR]    TextBox1.Text = thisworkbook.sheet("data").Cells(WorkSheetFunction.RandBetween(1, 1000), 1).Text [COLOR=#333333]End Sub[/COLOR]

Many thanks./.
 

Watch MrExcel Video

Forum statistics

Threads
1,122,232
Messages
5,594,962
Members
413,954
Latest member
mrsandy

We've detected that you are using an adblocker.

We have a great community of people providing Excel help here, but the hosting costs are enormous. You can help keep this site running by allowing ads on MrExcel.com.
Allow Ads at MrExcel

Which adblocker are you using?

Disable AdBlock

Follow these easy steps to disable AdBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the icon in the browser’s toolbar.
2)Click on the "Pause on this site" option.
Go back

Disable AdBlock Plus

Follow these easy steps to disable AdBlock Plus

1)Click on the icon in the browser’s toolbar.
2)Click on the toggle to disable it for "mrexcel.com".
Go back

Disable uBlock Origin

Follow these easy steps to disable uBlock Origin

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back

Disable uBlock

Follow these easy steps to disable uBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back
Top