How to loop through as many times as userform answer

[keineko]

Hello,

I hope I can explain this well...I have a user form pop up when a macro is run, and it prompts to put in a number. Depending on that number (x), a macro is re-interated "x" number of times. So far, all I can think of is to write "x" versions of that macro, so if the 2 was entered, then the "2" version of that macro would be run. I would just like it to loop as many times as the userform answer.

I feel like there already exists an answer to this, as it seems like something that is used often, but I couldn't find anything. Any help is much appreciated.

Many thanks!

[JasperD]

dim x&

Do while x < 10 'instead of 10, put the userform input here

'your code

x = x + 1
Loop

[keineko]

Hi,

Thanks for the info! With some messing around with what you provided, I came up with a slightly different method which worked for my purposes:

Dim i As Integer
Dim x&
x = UserForm1.TextBox1.Value
For i = 1 To x

'code stuffs

Next

[JasperD]

Great to hear you found your solution.
Just for future reference, you don't need the i in your code.

dim x&

Do while x < UserForm1.TextBox1.Value

'your code

x = x + 1
Loop

Also, the & in the dim is an abbreviation - see all abbreviations below:
integer : % (so you could have said dim i%)
long : &
single : !
double : #
string : $
currency : @