powered by simpleCommunicator - 2.0.53     © 2025 Programmizd 02
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Нужна помощь с автоматическим заполнением поля
9 сообщений из 9, страница 1 из 1
Нужна помощь с автоматическим заполнением поля
    #39467896
Alexey_79_79
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Добрый день, есть две таблицы. Одна рабочая(1), в которую вносятся данные, и есть другая(2) в которой введен список значений. Сделал через мастера подстановок, что бы в одном поле, основной таблицы(1), можно было выбирать значения из списка находящегося в другой таблицы(2). Теперь вопрос, как сделать так, что бы в поле таблицы (1), автоматически добавлялись значения из таблицы (2) при наборе букв которые есть в значениях в таблице (2)? сейчас они добавляются, если вводишь начальные буквы названий, а надо что бы водилось название независимо от того начальные буквы я ввожу или буквы расположенные в середине слова.
Если написал коряво, извините. Спасибо за понимание )
...
Рейтинг: 0 / 0
Нужна помощь с автоматическим заполнением поля
    #39467974
Фотография Akina
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Родной контрол (комбобокс?) так не умеет.
...
Рейтинг: 0 / 0
Нужна помощь с автоматическим заполнением поля
    #39468001
MrShin
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Тут без довольно приличного кода на VBA не обойдешься. Я использую свой класс для таких комбобоксов, который работает примерно как подсказка Гугла при наборе запроса - после пары символов раскрывается автоматически и список меняется при вводе каждого символа или серии символов, если ввод идет быстро, ищет по нескольким вхождениям. Если надо, могу поделиться, нужно только отдельный пример на mdb сделать.
...
Рейтинг: 0 / 0
Нужна помощь с автоматическим заполнением поля
    #39468004
Alexey_79_79
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
AkinaРодной контрол (комбобокс?) так не умеет.
Извините, родной кто? )
...
Рейтинг: 0 / 0
Нужна помощь с автоматическим заполнением поля
    #39468006
Alexey_79_79
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
MrShinТут без довольно приличного кода на VBA не обойдешься. Я использую свой класс для таких комбобоксов, который работает примерно как подсказка Гугла при наборе запроса - после пары символов раскрывается автоматически и список меняется при вводе каждого символа или серии символов, если ввод идет быстро, ищет по нескольким вхождениям. Если надо, могу поделиться, нужно только отдельный пример на mdb сделать.
Было бы не плохо, но боюсь потом просто запутаюсь, что и куда вставлять (
...
Рейтинг: 0 / 0
Нужна помощь с автоматическим заполнением поля
    #39468015
MrShin
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Ловите. Там для включения нужно скопировать класс и окно таймера, класс включается двумя строками кода, описание использования в коде класса
...
Рейтинг: 0 / 0
Нужна помощь с автоматическим заполнением поля
    #39468018
MrShin
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Да, забыл упомянуть, что сам запрос для комбобокса требует небольшой доработки, также нужно выключить штатное автозаполнение по первым буквам набора. В описании это есть.
...
Рейтинг: 0 / 0
Нужна помощь с автоматическим заполнением поля
    #39468376
Alexey_79_79
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
MrShinДа, забыл упомянуть, что сам запрос для комбобокса требует небольшой доработки, также нужно выключить штатное автозаполнение по первым буквам набора. В описании это есть.
Спасибо большое, буду ковырять!
...
Рейтинг: 0 / 0
Нужна помощь с автоматическим заполнением поля
    #39469350
vixxa
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Alexey_79_79Если написал коряво, извините. Спасибо за понимание )
Не вдаваясь в лингвистику, так пойдет? (см приложение)
MrShin Тут без довольно приличного кода на VBA не обойдешься
Код: vbnet
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
Option Compare Database
Private Sub КнопкаСохранить_Click()
DoCmd.RunSQL "INSERT INTO тбл_рабочая ( Значение ) SELECT '" & ПолеРезультатВТаблицу & "' AS Выражение1"
СписокРабочая.Requery
End Sub
Private Sub ПолеКонтекстныйПоиск_Change()
СписокЗначений.RowSource = "SELECT Значение FROM тбл_значения WHERE Значение LIKE '*" & ПолеКонтекстныйПоиск.Text & "*' ORDER BY Значение"
End Sub
Private Sub СписокЗначений_Click()
ПолеРезультатВТаблицу = СписокЗначений.Value
End Sub


верю, что говнокод, верю.... но работает, а может Alexey_79_79 больше и не надо?
...
Рейтинг: 0 / 0
9 сообщений из 9, страница 1 из 1
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Нужна помощь с автоматическим заполнением поля
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]