The code would be like this

rowend= Me.TextBox1.Value
set a value for the counter

For A=1 to countervalue
Do something
ActiveCell.Offset(1, 0).Select
Next A

--
If this helps, please remember to click yes.


"Richhall" wrote:

Hi

I have a simple userform with TextBox1, the user enters a value in
here and then based on this value does some work on that row, and i
want it to then move down a row and do the work again for the number
of rows in textbox1. How do I do a loop and count to do this please?

i.e

rowend= Me.TextBox1.Value
set a value for the counter

Start loop

If rowend=counter then end
Else
Do something
ActiveCell.Offset(1, 0).Activate
add 1 to counter
go back to start of loop

Cheers

Rich