Здравствуйте! Сделала выбор из списка, все хорошо, но когда 200 значений (ФИО), сложно и долго их искать в списке. Как можно сделать, что бы при наборе первых слов выскакивало нужное значение?
Спасибо
Здравствуйте! Сделала выбор из списка, все хорошо, но когда 200 значений (ФИО), сложно и долго их искать в списке. Как можно сделать, что бы при наборе первых слов выскакивало нужное значение?
Мозг вскипел) изучила ссылку Сергея, ну не осилить мне это. Я даже не понимаю с чего начать. Пример хороший, но для профи. При том, что с обычными формулами excel я неплохо справляюсь) Прошу помощи!?
Мозг вскипел) изучила ссылку Сергея, ну не осилить мне это. Я даже не понимаю с чего начать. Пример хороший, но для профи. При том, что с обычными формулами excel я неплохо справляюсь) Прошу помощи!?Marina_Spb
Спустя почти пять часов разобралась я немного что такое макрос, даже смогла добавить перевод "из цифры в сумму", но с подстановкой значение из списка не пойму как создать такие ячейки как в образце, да и на английском все. Как сделала выбор что бы при наборе первых слов выскакивало нужное значение (фио)? Уж очень хочу понять и осилить эту задачу. Помогите советом или ссылкой! Пожалуйста...
Спустя почти пять часов разобралась я немного что такое макрос, даже смогла добавить перевод "из цифры в сумму", но с подстановкой значение из списка не пойму как создать такие ячейки как в образце, да и на английском все. Как сделала выбор что бы при наборе первых слов выскакивало нужное значение (фио)? Уж очень хочу понять и осилить эту задачу. Помогите советом или ссылкой! Пожалуйста...Marina_Spb
Как раз и начните с изучения логики работы кода в этом примере. Откройте файл Поиск значений в базе данных по первым буквам… Перейдите в редактор VBA Слева будет VBAProject, выделите Forms-ufrmNilem – правый клик мыши-ViewCode Перед вами будет код, описывающий работу формы. При инициализации формы Private Sub UserForm_Initialize() в массив x записывается диапазон от A2 до последней непустой ячейки в столбце А (Sheet1) x = Range("A2", Cells(Rows.Count, 1).End(xlUp)).Value Затем вы вводите в TextBox1 какую-либо букву, срабатывает процедура Private Sub TextBox1_Change() и в ListBox1 записываются все значения из диапазона х, начинающиеся на эту букву. При выборе какого-либо значения в ListBox1 происходит выделение этого значения в диапазоне. Попробуйте на листе Sheet1 заполнить базу данных, нажав на стрелку Заполнить.. ( в В1 установите 20 – будет 20 случайных значений). Затем кликните Поиск с формой и проделайте процедуру, описанную выше. Попробуйте применить это к своему файлу
Цитата
даже не понимаю с чего начать. Пример хороший, но
Как раз и начните с изучения логики работы кода в этом примере. Откройте файл Поиск значений в базе данных по первым буквам… Перейдите в редактор VBA Слева будет VBAProject, выделите Forms-ufrmNilem – правый клик мыши-ViewCode Перед вами будет код, описывающий работу формы. При инициализации формы Private Sub UserForm_Initialize() в массив x записывается диапазон от A2 до последней непустой ячейки в столбце А (Sheet1) x = Range("A2", Cells(Rows.Count, 1).End(xlUp)).Value Затем вы вводите в TextBox1 какую-либо букву, срабатывает процедура Private Sub TextBox1_Change() и в ListBox1 записываются все значения из диапазона х, начинающиеся на эту букву. При выборе какого-либо значения в ListBox1 происходит выделение этого значения в диапазоне. Попробуйте на листе Sheet1 заполнить базу данных, нажав на стрелку Заполнить.. ( в В1 установите 20 – будет 20 случайных значений). Затем кликните Поиск с формой и проделайте процедуру, описанную выше. Попробуйте применить это к своему файлуKuzmich