Цитата TURNSKIN:
мне нужно в excel или как form сделать 2 и более combobox связаных между собой
т.е. если в первом вывераеться item Россия, то во втором поевляеться Москва, Питер, Ростов, Владик, если в первом Франция то во втором Париж, Морсель и Ница
как это сделать? »
|
Вставь два активиксных комбобокса и в коде листа напиши это:
Код:
Private Sub ComboBox1_MouseDown(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)
ComboBox1.Clear
ComboBox2.Clear
ComboBox1.AddItem ("Франция")
ComboBox1.AddItem ("Россия")
End Sub
Private Sub ComboBox1_Change()
If ComboBox1.ListIndex = 0 Then
ComboBox2.AddItem ("Париж")
ComboBox2.AddItem ("Марсель")
ComboBox2.AddItem ("Ница")
End If
If ComboBox1.ListIndex = 1 Then
ComboBox2.AddItem ("Москва")
ComboBox2.AddItem ("Питер")
ComboBox2.AddItem ("Ростов")
End If
End Sub