Looping UserForm controls

[SQUIDD]

Hi All

I'm trying to make my code a little more compact

Take the example below
I have loads of comboboxes to cycle through, well, about 36 and growing, now i could write the below out 36 times, but

    If Me.C1 <> "" Then
        If Me.C1C = "" Or Me.C1CC = "" Then MsgBox "MISSING INFOR A CRITERIA 1"
    End If
    If Me.C2 <> "" Then
        If Me.C2C = "" Or Me.C2CC = "" Then MsgBox "MISSING INFOR A CRITERIA 2"
    End If

could i not just loop like the below??
If i can i cannot work out how to actually write it.

dim a(1 to 36) as integer
for a = 1 to 36
    If Me.C(a) <> "" Then
        If Me.C(a)C = "" Or Me.C(a)CC = "" Then MsgBox "MISSING INFOR A CRITERIA " & a
    End If
next a

thanks for your help

Dave

 

[Tom Urtis]

Explain further what C1C and C2C and C2CC mean for example.

 

[SQUIDD]

Explain further...
• if these comboboxes are embedded onto a worksheet or are in a userform.
• if embedded onto a worksheet, clarify if they are Form control or ActiveX controls.
• what C1C and C2C and C2CC mean for example.

Hi Tom, thanks for the reply.

These combo boxes are on a user form(in a frame)
i have
36 combo boxes c1-c2-c3-c4 and so on
36 combo boxes c1c-c2c-c3c-c4c and so on
36 combo boxes c1cc-c2cc-c3cc-c4cc and so on

I'm not against re-naming them if its easier

i have more useform to make going forward as well, so not to keep to keep doing it longhand.

thanks

Dave

 

[RoryA]

You'd use Me.Controls("C" & a) and similarly for the other two controls.

 

[SQUIDD]

You'd use Me.Controls("C" & a) and similarly for the other two controls.

Thanks Rory, worked perfectly.

Much appreciated.

Dave