Имя пользователя:
Пароль:  
Помощь | Регистрация | Забыли пароль?  

Название темы: [архив] Microsoft Excel 2007
Показать сообщение отдельно

Пользователь


Сообщения: 121
Благодарности: 14

Профиль | Отправить PM | Цитировать


Цитата 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

-------
MeGUI для чайников.

Это сообщение посчитали полезным следующие участники:

Отправлено: 23:37, 04-03-2009 | #74

Название темы: [архив] Microsoft Excel 2007