Possible to call objects with a variable in VBA

[lukeshuttlewood]

Hi,

I have a list of combo boxes named like this on a form:

combobox1
combobox2
combobox3 etc


Since there is so many of them, is it possible to call them in a way such as below?

I cannot get the syntax right......

    x = 10
    Do While x > 0
        ComboBox(x).AddItem "TRUE"
        ComboBox(x).AddItem "FALSE"
        x = x - 1
    Loop

Thanks
Luke

 

[Sal Paradise]

Short answer: Sort of.

Long answer: Class Modules can probably do what you want.

Alternative Answer:

If you name your objects properly, then you can loop through all objects of a certain type with a certain name to accomplish the same sort of thing.

 

[tusharm]

Assuming the control is part of a userform and the code is in the userform's code module...Also, untested...

    x = 10
    Do While x > 0
        Me.Controls("ComboBox" & X).AddItem "TRUE"
        ...
        x = x - 1
    Loop

 

[lukeshuttlewood]

got it:

    x = 14
    Do While x > 0
        Name = "pf" & x
        Me.Controls(Name).AddItem "TRUE"
        x = x - 1
    Loop

 

[lukeshuttlewood]

Cheers Tursham!