|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
27.05.2010, 02:09 | #1 |
Пользователь
Регистрация: 13.05.2010
Сообщений: 39
|
Сomboboxы
Дорогие программисты, подскажите пожалуйста.
Как сделать так, чтобы в combobox2 добавлялись только те данные со второй колонки, которые соответствуют выбранному в combobox1 значению? Прикрепляю пример, userform13 там comboboxы, работаю с листом Москва. |
27.05.2010, 02:25 | #2 |
Старожил
Регистрация: 02.05.2009
Сообщений: 3,907
|
Код:
Анализ,обработка данных Недорого
|
27.05.2010, 13:04 | #3 |
Регистрация: 27.05.2010
Сообщений: 5
|
Private Sub ComboBox1_Change()
If ComboBox1 = "Москва" Then Sheets("Москва").Select If ComboBox1 = "Санкт-Петербург" Then Sheets("Москва").Select If ComboBox1 = "Новосибирск" Then Sheets("Москва").Select ComboBox2.Clear i = 2 While Cells(i, 1).Value <> "" With ComboBox2 If Cells(i, 1) = ComboBox1.Value Then .AddItem (Cells(i, 2)) End With i = i + 1 Wend End Sub Последний раз редактировалось Sham1963; 27.05.2010 в 13:08. |
27.05.2010, 14:33 | #4 |
Пользователь
Регистрация: 13.05.2010
Сообщений: 39
|
Спасибо большое!!! Все работает!
|