Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Microsoft Office и VBA программирование > Microsoft Office Excel
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 31.03.2013, 18:01   #1
and150382
Форумчанин
 
Регистрация: 19.10.2012
Сообщений: 217
По умолчанию Зависимые ComboBox-ы на форме

Попробовал сделать зависимые комбобоксы на форме по примеру, что-то не получилось. Подсвечивает arr
Хотелось бы чтобы при выборе числа из myColumn1( данные берутся из план столбец С), в myColumn6(данные берутся из план столбец AF) появлялся отфильтрованный адрес.

Вставил в Private Sub UserForm_Initialize()

Код:
arr = Range(Cells(3, 3), Cells(Rows.Count, "C").End(xlUp)).Value
With CreateObject("Scripting.Dictionary")
For i = LBound(arr) To UBound(arr)
.Item(arr(i, 1)) = 1
Next
Me.myColumn1.List = .Keys
End With
и в Private Sub myColumn1_Change()

Код:
arr = Sheets("План").Range(Cells(i, 1), Cells(Rows.Count, "AF").End(xlUp)).Value
With CreateObject("Scripting.Dictionary")
For i = LBound(arr) To UBound(arr)
If arr(i, 3) = Val(myColumn1.Value) Then
.Item(arr(i, 32)) = 1
End If
Next
Me.myColumn6.List = .Keys
End With
здесь же законспектировал прежние данные


До этого при выборе числа в комбобоксе myColumn1 показывался адрес в комбобоксе myColumn6 именно тот который стоит в одной строке с этим числом.

Числа в плане столбец С есть одинаковые. Нужно чтобы фильтрация была по числу. Тоесть если одинаковых чисел несколько, то при вводе такого числа в комбобоксе myColumn1- в комбобоксе myColumn6 появлялись бы несколько отфильтрованных адресов для последующего выбора, а остальные адреса были бы скрыты.
Может какой-нибудь автофильтр нужен
Вложения
Тип файла: rar ТТН.rar (319.4 Кб, 22 просмотров)
and150382 вне форума Ответить с цитированием
Старый 31.03.2013, 20:24   #2
and150382
Форумчанин
 
Регистрация: 19.10.2012
Сообщений: 217
По умолчанию

Тема закрыта
and150382 вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Из ComboBox на форме в ячейку листа. Вадим12091965 Microsoft Office Excel 8 28.10.2012 13:04
Создание двух столбцов в форме на элементе combobox momus Microsoft Office Excel 2 02.02.2012 22:30
зависимые ячейки AKSENOV048 Microsoft Office Excel 7 18.08.2011 01:07
Зависимые ячейки Aleksei_86 Microsoft Office Excel 0 17.06.2009 23:06
запрет изменение в ComboBox-е в форме SerArtur Microsoft Office Access 1 13.11.2008 16:52