for Looping in VBA/Form
For i = 1 To 10
me.Controls("Pax" & i).Caption = Range("D" & i + 4).Value
Next i
etc.
--
HTH
Bob Phillips
(replace somewhere in email address with gmail if mailing direct)
"Excel 2003 - SPB" wrote in message
...
I have many areas of code that could be cleaned if I only knew how
I think it would be a "For" statement in both cases
example 1
Pax1.Caption = Range("d5")
Pax2.Caption = Range("d6")
Pax3.Caption = Range("d7")
etc
example 2
TextBox31.Visible = False
TextBox32.Visible = False
TextBox33.Visible = False
I tried this
For i = 1 To 6
Seat " & i &.Caption = Range(""a" & i + l2 & """)"
next i
with no luck, I get a compile error highlighting "Seat"
Many thanks for any help
|