Поиск  Пользователи  Правила  Войти
Форумы "Планета Excel" » Вопросы по Microsoft Excel (архив)
Страницы: 1 2 След.
RSS
Элемент поле со списком
 
#1
26.02.2011 22:19:01
Имеется база данных с большим количеством данных. Созданы раскрывающиеся списки для выбора нужных данных но даных слишком много и очень муторно крутить полосу прокрутки ччтобя найти нужное значение.    
Вопрос: Как сделать сделать элемент поле со списком, в котором при вводе начальных букв слов подтягивалось нужное название в поле для ввода, а также чтобы была возможность после найденного слова по первым буквам ввести его нажатием клавиши "Ввод"?
 
 
 
#2
26.02.2011 22:28:13
У Вас сейчас используется контрол из панели инструметов Формы. Используйте аналогичный (ComboBox) из панели инструментов Элементы управления.
 
 
 
#3
26.02.2011 22:32:39
{quote}{login=Юрий М}{date=26.02.2011 10:28}{thema=}{post}У Вас сейчас используется контрол из панели инструметов Формы. Используйте аналогичный (ComboBox) из панели инструментов Элементы управления.{/post}{/quote}  
 
Не могу найти панель Формв. Где она находится? офис 2010
 
 
 
#4
26.02.2011 22:33:21
Не знаю :-) (2003)
 
 
 
#5
26.02.2011 22:37:38
{quote}{login=Юрий М}{date=26.02.2011 10:33}{thema=}{post}Не знаю :-) (2003){/post}{/quote}  
 
Тупик, приехали! :) Никто ничего не знает
 
 
 
#6
26.02.2011 22:53:43
Для начала здесь
 
 
 
#7
26.02.2011 23:11:01
{quote}{login=RAN}{date=26.02.2011 10:53}{thema=}{post}Для начала здесь{/post}{/quote}  
 
У меня совсем другие параметры см скриншот. Нет опции "Показывать панель разработчика"
 
 
 
#8
26.02.2011 23:17:13
Зато есть настройка ленты.
 
 
 
#9
26.02.2011 23:17:39
{quote}{login=loginvovchyk}{date=26.02.2011 11:11}{thema=Re: }{post}{quote}{login=RAN}{date=26.02.2011 10:53}{thema=}{post}Для начала здесь{/post}{/quote}  
 
У меня совсем другие параметры см скриншот. Нет опции "Показывать панель разработчика"{/post}{/quote}  
 
настройка ленты, там ищите %)
Спасибо
 
 
 
#10
26.02.2011 23:20:02
{quote} настройка ленты, там ищите %){/quote}  
 
Нашел, элемент ComboBox неактивный как мне его добавить?
 
 
 
#11
26.02.2011 23:22:58
{quote}{login=loginvovchyk}{date=26.02.2011 11:20}{thema=Re: Re: Re: }{post}{quote} настройка ленты, там ищите %){/quote}  
 
Нашел, элемент ComboBox неактивный как мне его добавить?{/post}{/quote  
 
 
смотрите элементы activex
Спасибо
 
 
 
#12
26.02.2011 23:24:28
пардон затицировался %)  
 
элементы activex смотрите
Спасибо
 
 
 
#13
26.02.2011 23:28:32
{quote}{login=R Dmitry}{date=26.02.2011 11:24}{thema=}{post}пардон затицировался %)  
 
элементы activex смотрите{/post}{/quote}  
 
Посмотрел и вот что увидел:
 
 
 
#14
26.02.2011 23:38:36
Вам говорят ActiveX - Вы обводите элементы управления Формы...
 
 
 
#15
26.02.2011 23:42:27
А что Вы их за надписью прячете :)  
 
-11882-
Спасибо
 
 
 
#16
26.02.2011 23:45:17
{quote}{login=Юрий М}{date=26.02.2011 11:38}{thema=}{post}Вам говорят ActiveX - Вы обводите элементы управления Формы...{/post}{/quote}  
 
И что мне делать дальше? Мы большую часть уточняли где находится нужный элемент. А нельзя просто показать пример? Файл прикреплен выше
 
 
 
#17
26.02.2011 23:50:05
Создал я элемент, но дальше я не знаю как привязать данные к элементу ComboBox.
 
 
 
#18
27.02.2011 00:08:38
{quote}{login=loginvovchyk}{date=26.02.2011 11:45}{thema=Re: }{post}{quote}{login=Юрий М}{date=26.02.2011 11:38}{thema=}{post}Вам говорят ActiveX - Вы обводите элементы управления Формы...{/post}{/quote} Мы большую часть уточняли где находится нужный элемент. {/post}{/quote}  
А вот если бы Вы читали ответы, то не обвели бы "неправильные" контролы. И времени меньше потратили.  
По вопросу: включаем режим конструктора, выделяем наш контрол, жмём на Свойства, ищем ListFillRange и указываем диапазон.  
Следующий вопрос: как включить режим конструктора?
 
 
 
#19
27.02.2011 00:29:20
Что делать дальше? указал диапазон. Почему элемент при щелчке на нем включается в режим редактирования? как теперь посмотреть данные в нем
 
 
 
#20
27.02.2011 00:32:29
Кроме диапазона, следует указать связанную ячейку (по аналогии с Вашим примером). После этого режим конструктора следует выключить. Элемент управления готов к работе.
 
 
 
#21
27.02.2011 00:40:31
{quote}{login=Юрий М}{date=27.02.2011 12:32}{thema=}{post}Кроме диапазона, следует указать связанную ячейку (по аналогии с Вашим примером). После этого режим конструктора следует выключить. Элемент управления готов к работе.{/post}{/quote}  
 
Все сделал  и получил ошибку "Ошибка условного заявления". В макросах я не разбираюсь :(((  
 
Сделайте пожалуйста пример рабочего ComboBox на одном из раскрывающихся списков из прикрепляемого  файла, мне проще будет понять принцип его работы. так как я с этим элементом сталкиваюсь впервые
 
 
 
#22
27.02.2011 00:46:48
Проще (и полезнее) будет на нейтральном примере. Разбирайтесь. Код в модуле листа.
 
 
 
#23
27.02.2011 00:52:47
{quote}{login=Юрий М}{date=27.02.2011 12:46}{thema=}{post}Проще (и полезнее) будет на нейтральном примере. Разбирайтесь. Код в модуле листа.{/post}{/quote}  
 
В вашем примере происхоит ошибка. Например выбрал 1 все ОК. Если затереть в поле 1 для ввода других данных происходит ошибка: Run-time "381"
 
 
 
#24
27.02.2011 00:59:41
А мой пример для того, что бы Вы разобрались - как можно из ComboBox получать значения на лист. Иначе дальше Вы не продвинетесь.  
А вот на примере Вашего файла набор по первым символам.
 
 
 
#25
27.02.2011 01:06:29
{quote}{login=loginvovchyk}{date=27.02.2011 12:52}{thema=Re: }{post}{quote}{login=Юрий М}{date=27.02.2011 12:46}{thema=}{post}Проще (и полезнее) будет на нейтральном примере. Разбирайтесь. Код в модуле листа.{/post}{/quote}  
 
В вашем примере происхоит ошибка. Например выбрал 1 все ОК. Если затереть в поле 1 для ввода других данных происходит ошибка: Run-time "381"{/post}{/quote}Замените код листа на этот:  
 
Private Sub ComboBox1_Change()  
With ComboBox1  
   If .MatchFound Then  
       Range("G1") = .List(.ListIndex, 0)  
       Range("H1") = .List(.ListIndex, 1)  
       Range("I1") = .List(.ListIndex, 2)  
   Else  
       Range("G1:I1") = ""  
   End If  
End With  
End Sub
 
 
 
#26
27.02.2011 01:32:52
Создал нужные combobox но теперь я запутался как подключить данные для заполнения как это было в раскрывающихся списках.
 
 
 
#27
27.02.2011 10:53:21
Выделенный ценник.
 
 
 
#28
27.02.2011 20:09:37
Спасибо получилось.  
 
Вопрос 2. Как выделить текст в ComboBox одним щелчком мыши в любом месте?
 
 
 
#29
27.02.2011 20:45:06
Попробуйте вставить такой код:  
Private Sub ComboBox1_MouseUp(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)  
With ComboBox1  
.SelStart = 0  
.SelLength = Len(ComboBox1.Text)  
End With  
End Sub
 
 
 
#30
27.02.2011 20:54:39
{quote}{login=Юрий М}{date=27.02.2011 08:45}{thema=}{post}Попробуйте вставить такой код:  
Private Sub ComboBox1_MouseUp(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)  
With ComboBox1  
.SelStart = 0  
.SelLength = Len(ComboBox1.Text)  
End With  
End Sub{/post}{/quote}  
 
Спасибо самое то!
 
 
 
Страницы: 1 2 След.
Читают тему
Наверх