Друзья, привет!
Все мы знакомы с выпадающими списками, но бывает что значений оказывается слишком много для простого скролинга.
Для решения такой задачи заказал макрос год назад, делюсь для всех, во вложении.
Вопрос темы: Помогите доработать.
Сейчас возникла задача использовать несколько полей с поиском из разных блоков (порядка 4 листов на каждом по 3 столбца с поиском)., как же масштабировать этот макрос? Вот тут нужна помощь экспертов.
Вопросы с которыми не разобрался:
1) Какие элементы используются в конструкторе? Если верно полня поле ввода это ActiveX текстовое поле, а что за ListBox и Lable? Не могу найти их, возможно они включаются? И можно ли создать их на 1 листе, а использовать на разных?
2) Можно ли переформатировать данный скрипт под функцию или необходимо прописывать набор из 4 макросов под каждый диапазон / базу?
3) Есть ли идеи по оптимизации кода, например строка "If Not Intersect(Target, Range("A2:A1000")) Is Nothing Then" - выглядит странно двойным отрицанием.
Буду рад если найдутся знающие люди и помогут унифицировать и масштабировать решение.
Заранее спасибо.
Все мы знакомы с выпадающими списками, но бывает что значений оказывается слишком много для простого скролинга.
Для решения такой задачи заказал макрос год назад, делюсь для всех, во вложении.
Вопрос темы: Помогите доработать.
Сейчас возникла задача использовать несколько полей с поиском из разных блоков (порядка 4 листов на каждом по 3 столбца с поиском)., как же масштабировать этот макрос? Вот тут нужна помощь экспертов.
Вопросы с которыми не разобрался:
1) Какие элементы используются в конструкторе? Если верно полня поле ввода это ActiveX текстовое поле, а что за ListBox и Lable? Не могу найти их, возможно они включаются? И можно ли создать их на 1 листе, а использовать на разных?
2) Можно ли переформатировать данный скрипт под функцию или необходимо прописывать набор из 4 макросов под каждый диапазон / базу?
3) Есть ли идеи по оптимизации кода, например строка "If Not Intersect(Target, Range("A2:A1000")) Is Nothing Then" - выглядит странно двойным отрицанием.
Буду рад если найдутся знающие люди и помогут унифицировать и масштабировать решение.
Заранее спасибо.
невозможное делаем сразу, чудо - требует небольшой подготовки.