VARIABLE SUBSTITUTION

[Robert Lowe]

Hi,
I have a form with 24 checkboxes. (CheckBox1...CheckBox24)
Is there a way to make the following work?
This works...
If CheckBox3 Then MsgBox "Three"
This doesn't...
i = 3
z = "CheckBox" & LTrim(Str(i))
If z Then MsgBox "Three"

Thank you

 

[Juan Pablo Gonzalez]

If the Checkboxes are in a userform, try this:

z = Me.Controls("CheckBox" & i).Object .Value

 

[Bob Phillips]

Robert,

This is how you do it

If Me.Controls("Checkbox" & i).Value = True Then
MsgBox "Found"
End If


--

HTH

Bob Phillips
... looking out across Poole Harbour to the Purbecks
(remove nothere from the email address if mailing direct)

 

[Robert Lowe]

Thank a lot...
It works great. I would never have gotten it!
I have MUCH to learn....
Robert