несколько ComboBox-ов с одинаковыми данными....

[brans]

добрый день! такой вопрос: на форме у меня к примеру восемь ComboBox-ов с данными "2,3,4,5" как написать к ним код так, что не указывать каждый ComboBox, а присвоть им данные в совокупности...

[VictorM]

Если ComboBox-ы нумерованые, можно так:

Private Sub UserForm_Activate()
For i = 1 To 5
        Me.Controls("ComboBox" & i).Value = "2"
    Next i
End Sub

[brans]

Сообщение от VictorM

Если ComboBox-ы нумерованые, можно так:

Private Sub UserForm_Activate()
For i = 1 To 5
        Me.Controls("ComboBox" & i).Value = "2"
    Next i
End Sub

спасибо)))