Страницы: 1
RSS
Автопоиск по первым буквам из выпадающего списка
 
Добрый день Планетяне! :-)  
Хочу спросить возможно ли сделать следующее:  
Имеется колонка с выпадающим списком (в моём случае "В").  
Необходимо чтобы при вводе текста в любую ячейку этой колонки, выдавались варианты совпадений по заданному тексту из выпадающего списка. И при помощи клавиш "вверх" "вниз" и "Enter"  
можно было осуществить выбор необходимой позиции (по аналогии с 1С).  
Это реально?  
Благодарю за внимание.
 
думаю, это можно осуществить через пользовательскую форму.  
 
еще вариант Alt+Вниз
Чебурашка стал символом олимпийских игр. А чего достиг ты?
Тишина - самый громкий звук


https://github.com/nervgh
 
{quote}{login=nerv}{date=09.07.2011 06:24}{thema=}{post}думаю, это можно осуществить через пользовательскую форму.{/post}{/quote}  
Спасибо за Ваш ответ. Только вот в этом деле я практически ничего не понимаю.  
Что есть пользовательская форма?
 
Посмотрите по ссылке  
 http://www.planetaexcel.ru/forum.php?thread_id=11478  
Там, кажется, есть несколько вариантов подобного решения. Возможно что то Вам и подойдет.
 
К сожалению ничего из предложенного Вами не подходит мне (((
 
Посмотрите вариант.  
По двойному клику значение из списка переносится в ячейку на листе.
 
Спасибо, но Ваш вариант ещё более усложняет работу над этим документом.  
Это не то.
 
по моему, предложенный вариант вполне нормальный.  
иначе как вы себе представляете автозаполнение при наличии 8 позиций с началом "Активиа йогурт 120г"?
 
Попробуйте поиском.  
Ваша тема минимум 2-3 раза в месяц периодически повторяется. На всех форумах.
 
Попробуйте такой вариант.  
Вводите текст, нажимаете Enter, в ячейке формируется выпадающий список, содержащий введенный текст. Из выпадающего списка выбираете нужную позицию.
 
Именно это мне и нужно!  
Только вот как это сделать???
 
Чуть исправил код. В предыдущем ошибся.  
Код можно посмотреть если кликнуть ПКМ на ярлыке листа (Sheet1) и в меню выбрать исходный текст.
 
Вот так лучше будет.
 
Доброе утро Рома. Теперь если можно расскажи, как пользоваться этим док-том?
 
Роман, большое спасибо за ваш файл. у меня похожая проблема из выпадающего списка в 57 тыс позиций надо выбрать материал, и ваш файлик очень помог. можете подсказать: есть возможность организовать выбор по части слов, например: *анкер*канат* или "анкер*1270* чтобы сузить список
 
Роман, подскажите почему не работает поиск. слишком большой список номенклатуры матриалов?  
<EM><STRONG>Файл удален</STRONG> - велик размер - 1,4М [<STRONG>МОДЕРАТОРЫ</STRONG>]</EM>
 
Света, Вам бы с Правилами ознакомиться...
 
А попробывать?  
Напишите анкер канат и в списке будут только анкер канатный.  
Так как у Вас в списке есть запятые, например  
Анкер канатный АК 02 L=6,5м  
То эту строку    
If InStr(UCase(arr(i, 1)), UCase(Target.Value)) > 0 Then sRez = arr(i,1) & sRez  
Лучше записать так:  
If InStr(UCase(arr(i, 1)), UCase(Target.Value)) > 0 Then sRez = Replace(arr(i, 1), ",", ".") & "," & sRez
 
вот.. делал одному человеку..  
 
для желтых полей дает выпадающие списки(содержание - на листе справочники), при вводе буквов автоматически фильтрует списки. можно вводить фразы - настроено чтобы содержало все слова фразы..(можно и по-другому)
Живи и дай жить..
 
слэн, добрый день. Случайно обнаружил следующее: в столбце напротив ячеек помеченных желтым (т.е. там где появляется комбо) если активировать появление комбо и выбрать любую позицию (впрочем, можно и не выбирать), при нажатии Escape и переходе на другую ячейку, комбо остается видимым.  
 
=55122=
Чебурашка стал символом олимпийских игр. А чего достиг ты?
Тишина - самый громкий звук


https://github.com/nervgh
 
\
Чебурашка стал символом олимпийских игр. А чего достиг ты?
Тишина - самый громкий звук


https://github.com/nervgh
 
да, это так..  
 
писалось для 2007го икселя
Живи и дай жить..
 
Да все равно круто : )  
 
=79997=
Чебурашка стал символом олимпийских игр. А чего достиг ты?
Тишина - самый громкий звук


https://github.com/nervgh
 
Юрий М  
Извиняюсь, правила не прочитала, тк очень обрадовалась когда увидела решение.  
 
Роман  
я уже потом увидела, что сортировка происходит и без звездочек. Попробую завтра Ваши правки сделать. посмотри что получится. Спасибо ;)
 
Если кому интересно: обнаружила следующую деталь: при автопоиске из списка, если количество значений удовлетворяющих заданному слову больше 100 возможность выбора из выпадающего окна отсортированных значений не происходит, надо указывать еще один параметр(или слово).    
Роман, еще раз спасибо все отлично работает
 
Думаю, для Светы лучше бы подошло это решение (нужно эти темы перевязать :) ):  
 http://www.planetaexcel.ru/forum.php?thread_id=35087  
*анкер*канат* тоже вполне работает :)
 
еще вариант здесь  
http://www.excel-vba.ru/general/moi-nadstrojki/vypadayushhij-spisok-s-poiskom  
http://excelvba.ru/code/DropDownList
Чебурашка стал символом олимпийских игр. А чего достиг ты?
Тишина - самый громкий звук


https://github.com/nervgh
 
добрый день, планетяне  
 
столкнулся с этой же проблемой - необходимостью создания автопоиска для финансовых форм. почитал формум, решения для продвинутого пользователя (непрограммиста) не нашел...  
вопрос: подскажите, если я не учился программированию, самостоятельно эту функцию автопоиска по буквам возможно организовать для форм рабочих или только выкладывать файлы на форум и просить о помощи?  
 
заранее благодарен.
 
Спасибо) Не осилил бы сам не никогда!
Страницы: 1
Наверх