G
Guest
Guest
Hello...again
Can anybody help me to solve this Ploblem?
I try to additem for 3 comboBoxs and I want to use For .....Next to make it Short (Because I have to add about 50 items) , I used the follow command but it not work . Can anybody give me some Suggestion ?(What's wrong)
For i = 1 to 3
With ActiveSheet.Shapes(ComboBox i ).Select
.Additem "A"
.Additem "B"
...............
..............
..............
End with
Next i
Can anybody help me to solve this Ploblem?
I try to additem for 3 comboBoxs and I want to use For .....Next to make it Short (Because I have to add about 50 items) , I used the follow command but it not work . Can anybody give me some Suggestion ?(What's wrong)
For i = 1 to 3
With ActiveSheet.Shapes(ComboBox i ).Select
.Additem "A"
.Additem "B"
...............
..............
..............
End with
Next i