Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / XL and VBA - поиск и редактирование записи в форме / 5 сообщений из 5, страница 1 из 1
22.09.2010, 07:32
    #36859254
alkont
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
XL and VBA - поиск и редактирование записи в форме
Прошу помощи у знатоков XL & VBA. Ситуация такая (используется 2007, файл приложен): через форму в базу заносятся записи о документах. Этот ввод реализован. Нужно найти в базе имеющуюся запись и отредактировать ее. Для этого прикручены textbox и listbox. Ввод в тестовое поле (по полю "Название") выводит в списке названия документов, содержащих маску ввода. Выбор названия в списке открывает все поля для редактирования. Внесение изменений идет по кнопке «Изменить». Тут и возникает большое «НО».
Если в базе есть несколько документов с одинаковым названием, то все они попадают в список, но для редактирования открывается только первый из них. А нужно, чтобы можно было редактировать любую запись. Для этого прикручена возможность выбора в форму выделенной строки. Выделенная запись попадает в форму (заполняет все нужные поля), но при нажатии кнопки «Изменить» ничего не происходит. В чем ошибка кода – найти не могу.
Отсюда и просьба: как сделать так, чтобы ЛИБО любая запись из списка могла редактироваться, ЛИБО можно было отредактировать запись, предварительно выделенную на листе?
Заранее спасибо за помощь.
...
Рейтинг: 0 / 0
22.09.2010, 11:14
    #36859526
Hugo121
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
XL and VBA - поиск и редактирование записи в форме
alkont,
у Вас условие
If Cells(i, 5) = TextBox1.Text Then
не выполняется, если TextBox1.Text изменили, соотв. ничего не заносится.
...
Рейтинг: 0 / 0
22.09.2010, 15:18
    #36860315
alkont
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
XL and VBA - поиск и редактирование записи в форме
Hugo121,

Понятно. То есть исправлять данные в Textbox1 нельзя.
Остальные данные исправляются. Но почему-то не работают нормально DTPicker'ы. На одной вкладке установишь, нажмешь "Исправить" - на листе отображаются правильные даты, а с другой вкладки почему-то "обнуляются".
...
Рейтинг: 0 / 0
22.09.2010, 16:01
    #36860468
Hugo121
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
XL and VBA - поиск и редактирование записи в форме
alkont, я вот тоже не пойму, почему 4-й и 5-й обнулены. В свойствах значение есть, на форме тоже видно, а на самом деле 00:00:00...
...
Рейтинг: 0 / 0
01.10.2010, 07:05
    #36876004
alkont
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
XL and VBA - поиск и редактирование записи в форме
Hugo121,

Я придумал, как отредактировать название. По специальной кнопке открывается дополнительная формочка с текстовым полем с названием. В этом поле название исправляем и по кнопке ОК оно вносится в нужную ячейку и обновляет форму для поиска.
С датами тоже удалось справиться. Проблема была из-за контрола MultiPage. Чтобы не ...ся с переключениями по страницам, я отказался от DTPickеr'ов и заменил их на текстовые поля с вызовом элемента "Календарь".
Но проблема с формой поиска остается. Прошу помочь в решении (файл не прилагаю).
Есть таблица с организациями (название и город). Естественно, в одном городе много организаций. Причем названия у организаций не уникальные (много повторяющихся).
На форме (среди прочих элементов) есть комбобокс, текстовое поле и листбокс. Комбобокс заполняется данными из специально сделанного справочника "Города". В текстовое поле вводится часть названия организации и в листбоксе появляются названия, соответствующие поисковой маске. Мне нужно, чтобы можно было "отфильтровать" в листбоксе только те организации, которые И находятся в выбранном городе (фильтр по комбобоксу) И соответствуют заданной маске (фильтр по текстовому полю).
Я новичок в VBA, то, что я прочитал, приводит к мысли о том, что тут не обойтись без массивов, но с ними я еще ни разу не сталкивался. Впрочем, может будут другие варианты...
...
Рейтинг: 0 / 0
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / XL and VBA - поиск и редактирование записи в форме / 5 сообщений из 5, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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