Форумы HiProg.com - MS ACCESS, VBA, VB

 

Ответить на сообщение

Вернуться к теме

Вы отвечаете на сообщение:

ник: Анатолий (Киев)
Что-то вы напутали...
Допустим, на главной форме есть элементы-контейнеры субформ с именами "Суб1" и "Суб2".
В подформе "Суб1" есть поле "Галочка". В запросе-источнике подформы "Суб1" должно быть условие: WHERE [Галочка] = False.
У подформы Суб2 должно быть разрешено добавление записей.
На событие AfterUpdate поля "Галочка" пишем:
IF Me![Галочка]=False Then Exit Sub  'Обрабатываем только установку флажка
Set rst = Me.Parent!Суб2.Form.Recordset  'Получаем ссылку на Recordset-получатель
rst.AddNew
'Заполняем поля
rst.Update  'Новая запись добавлена в Суб2 и она - текущая 
Me.Requery  'Перезапрос Суб1 - отмеченная запись исчезает.


Ваше имя:

Пароль:

Цитировать: [quote][/quote] Код: [code][/code]
Жирный: [b][/b] Наклонный: [i][/i]
URL: [url][/url] 

Сообщение:

 Размер файла не более 50 Кбт. Большие файлы можно размещать на www.slil.ru

Прикрепить:

 

Для вставки смайлов в текст щелкните по значку.