Ввод значений из списка с поиском по первым буквам при вводе

Старая форма входа

Страница 1 из 1 1
Модератор форума: китин, _Boroda_

Ввод значений из списка с поиском по первым буквам при вводе (Макросы/Sub)

Wyatich

Дата: Пятница, 04.08.2017, 14:29 | Сообщение № 1

Группа: Пользователи

Ранг: Новичок

Сообщений: 12

Репутация: 0 ±

Замечаний: 0% ±

Excel 2010

Доброго дня!
В приложенном файле во вкладке "Дневные работы" нужно заполнять столбец "наименование работ", после чего ВПРом будет подставляется цена.
Данные берутся со вкладки "цены" (для уменьшения размера файла список сократил, а в работе будет около тысячи наименований).

Как сделать что бы при начале ввода в ячейку, предлагались варианты по введенным буквам?

В разделе "готовые решения" есть очень похожий вариант http://www.excelworld.ru/board/vba/tricks/find_in_database/9-1-0-27 (в частности, метод ENTRY с файла-примера), по факту нужно что-то похожее, но с расположением базы и заполняемой таблицы на разных листах.

Буду признателен за помощь.

К сообщению приложен файл: 5454.xls (86.5 Kb)

Ответить

китин

Дата: Пятница, 04.08.2017, 14:55 | Сообщение № 2

Группа: Модераторы

Ранг: Экселист

Сообщений: 7029

Репутация: 1078 ±

Замечаний: 0% ±

Excel 2007;2010;2016

а тут Готовое решение дорешали
ПОЧИТАЙТЕ

Не судите очень строго:я пытаюсь научиться
ЯД 41001877306852

Ответить

Wyatich

Дата: Пятница, 04.08.2017, 16:28 | Сообщение № 3

Группа: Пользователи

Ранг: Новичок

Сообщений: 12

Репутация: 0 ±

Замечаний: 0% ±

Excel 2010

Благодарю за ссылку, все сделал, как там указано: боксы на лист добавил, код скопировал, изменил номер столбца с вводом, но поиск не работает, листбокс пустой (
Буду писать в ту тему если сам не пойму в чем ошибка.

P.S. причем в файле из той темы поиск у меня тоже не работает...может в экселе не хватает чего

Сообщение отредактировал Wyatich - Пятница, 04.08.2017, 16:31

Ответить

Wyatich

Дата: Пятница, 04.08.2017, 16:47 | Сообщение № 4

Группа: Пользователи

Ранг: Новичок

Сообщений: 12

Репутация: 0 ±

Замечаний: 0% ±

Excel 2010

Здравствуйте!

Ткните, пожалуйста, меня носом, что я не так сделал - код скопировал, оба бокса отображаются, но поиск не работает.

К сообщению приложен файл: 5454.xls (88.5 Kb)

Ответить

Manyasha

Дата: Пятница, 04.08.2017, 17:56 | Сообщение № 5

Группа: Модераторы

Ранг: Старожил

Сообщений: 2198

Репутация: 901 ±

Замечаний: 0% ±

Excel 2010, 2016

Решайте свою проблему в этой теме. Последнее сообщение перенесла сюда.
В Вашем файле все работает, встаньте курсором в текстбокс перед вводом.

ЯД: 410013299366744 WM: R193491431804

Ответить

Udik

Дата: Пятница, 04.08.2017, 18:02 | Сообщение № 6

Группа: Друзья

Ранг: Старожил

Сообщений: 1588

Репутация: 192 ±

Замечаний: 0% ±

Excel 2016 х 64

Не знаю что-там в Вашем файле, вот вариант с юзерформой. Помимо модуля формы код в модуле листа на котором вводим данные.

К сообщению приложен файл: 9886704.xlsm (35.0 Kb)

вот вам барабан
яд 41001231307558 wm R419131876897
udik1968@gmail.com

Ответить

Wyatich

Дата: Суббота, 05.08.2017, 15:15 | Сообщение № 7

Группа: Пользователи

Ранг: Новичок

Сообщений: 12

Репутация: 0 ±

Замечаний: 0% ±

Excel 2010

Цитата Manyasha, 04.08.2017 в 17:56, в сообщении № 5 ()

встаньте курсором в текстбокс перед вводом

Вот в чем было дело ))
Благодарю, вопрос решён!

Ответить

Wyatich

Дата: Пятница, 11.08.2017, 17:16 | Сообщение № 8

Группа: Пользователи

Ранг: Новичок

Сообщений: 12

Репутация: 0 ±

Замечаний: 0% ±

Excel 2010

Здравствуйте!
С макросом возникла проблема - при вводе в текстбокс листбокс начинает сжиматься с каждым введенным символом и уползать наверх к началу таблицы.
В прикрепленном файле всё сразу видно.
Как это исправить?

P.S. или вопрос нужно выносить в новую тему ?

К сообщению приложен файл: 333.xls (79.0 Kb)

Ответить

nilem

Дата: Пятница, 11.08.2017, 17:40 | Сообщение № 9

Группа: Авторы

Ранг: Старожил

Сообщений: 1613

Репутация: 563 ±

Замечаний: 0% ±

Excel 2013, 2016

Wyatich, привет
попробуйте установить свойство Листбокса IntegralHeight = False
вот файлик с изменениями. Фурычит?
[offtop]"листбокс начинает сжиматься с каждым введенным символом и уползать наверх к началу таблицы"
Ну просто ему там больше нравится )[/offtop]

К сообщению приложен файл: _333.xls (83.0 Kb)

Яндекс.Деньги 4100159601573

Сообщение отредактировал nilem - Пятница, 11.08.2017, 17:43

Ответить

Wyatich

Дата: Пятница, 11.08.2017, 18:20 | Сообщение № 10

Группа: Пользователи

Ранг: Новичок

Сообщений: 12

Репутация: 0 ±

Замечаний: 0% ±

Excel 2010

Да, уползать перестало, спасибо )

А почему иногда курсор становится крестиком и не дает выбрать появившееся значение в листбоксе?

Ответить

Лиза

Дата: Четверг, 14.12.2017, 16:33 | Сообщение № 11

Группа: Пользователи

Ранг: Прохожий

Сообщений: 3

Репутация: 0 ±

Замечаний: 0% ±

Excel 2013

Добрый день, возник вопрос как добавить в коде еще один столбец для заполнения.

Ответить

Manyasha

Дата: Четверг, 14.12.2017, 23:42 | Сообщение № 12

Группа: Модераторы

Ранг: Старожил

Сообщений: 2198

Репутация: 901 ±

Замечаний: 0% ±

Excel 2010, 2016

Лиза, Вам уже ответили здесь

ЯД: 410013299366744 WM: R193491431804

Ответить

velikoleg

Дата: Среда, 14.02.2018, 12:53 | Сообщение № 13

Группа: Пользователи

Ранг: Новичок

Сообщений: 24

Репутация: 0 ±

Замечаний: 0% ±

Excel 2010

Здравствуйте!

Помогите пожалуйста сделать поиск не по первым буквам, а по первым трём цифрам из номера авто.
К примеру есть номер (B001BT000), вводим 001 и нам выдает все номера с первыми цифрами 001. Если данная комбинация встречается в конце, (B004BT001) то её не распознавать.

К сообщению приложен файл: _-.xlsm (44.2 Kb)

Сообщение отредактировал velikoleg - Среда, 14.02.2018, 12:53

Ответить

Pelena

Дата: Среда, 14.02.2018, 14:04 | Сообщение № 14

Группа: Админы

Ранг: Местный житель

Сообщений: 19401

Репутация: 4549 ±

Замечаний: ±

Excel 365 & Mac Excel

velikoleg, создайте свою тему. Эта тема закрыта

"Черт возьми, Холмс! Но как??!!"
Ю-money 41001765434816

Ответить

Ввод значений из списка с поиском по первым буквам при вводе (Макросы/Sub)

Страница 1 из 1
1