Looping through TextBox's

P

PaulW

Do Until x = 101
Sheets("Sheet1").Cells(n, x + 5) = TextBox(x).Value
x = x + 1
Loop

That's essentially what I want to do, take the values of Textboxes 1 to 100
and put them in columns F to whatever. How can I loop through the textboxes
without having to have a line for every box?
 
P

PaulW

Thanks!

Bob Phillips said:
Do Until x = 101
Sheets("Sheet1").Cells(n, x + 5) = Userform1.Controls("TextBox" &
x).Value
x = x + 1
Loop


--
HTH

Bob

(there's no email, no snail mail, but somewhere should be gmail in my addy)
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top