Проверка поля на пустоту

[denis.ta-com]

Доброго времени суток.
В макросе происходит копирование из таблицы "T1" в таблицу "T2", хочу добавить условие (если ячейка "P4" не пуста то произвести копирование иначе нет) поля обеих таблиц текстовые, таблица "T1" имеет всего 1-у строку (хранит временные данные).
Как написать условие для ячейки таблицы? С формами проблем нет но плодить их не хочется.

...
DoCmd.OpenTable "T2", acViewNormal, acEdit
DoCmd.GoToRecord acTable, "T2", acNewRec
DoCmd.OpenTable "T1", acViewNormal, acEdit
DoCmd.GoToControl "P4"
If ячейка P4 таблицы T1 не пуста Then
DoCmd.RunCommand acCmdCopy
DoCmd.SelectObject acTable, "T2", False
DoCmd.GoToControl "P1"
DoCmd.RunCommand acCmdPaste
DoCmd.SelectObject acTable, "T1", False
DoCmd.GoToControl "P3"
DoCmd.RunCommand acCmdCopy
DoCmd.SelectObject acTable, "T2", False
DoCmd.GoToControl "P2"
DoCmd.RunCommand acCmdPaste
End If
...

Пытался сделать так : If Not IsEmpty(P4.Text) Then
но получаю от Access Object required
при : If [P4] <> "" Then - объект не найден или закрыт
Как сослаться на ячейку таблицы?

[alvk]

Не совсем понятен термин "ячейка". У вас точно Акцесс? Копирование вообще что такое? Вы добавляете данные? Делаете update?
DoCmd.RunCommand - аппендикс, имхо.

[gluk_fm]

Доброе утро.
Больше похоже на попытки обработки связанной ексель таблицы
Для проверки пустот можно предложить простой запрос на удаление строк, в котором в условии отбора прописать null or "".
Хорошего дня.

[denis.ta-com]

Это точно Access, а макрос был преобразован в VBA, удалять строки мне не нужно, в таблице "T1" всего одна стока, а полей несколько (которые могут быть заполнены или нет)
Ячейка - это область, определяемая пересечением столбца и строки таблицы. В моем случае 1-ая срока столбец(поле) "P4"/
Как значение этой ячейки можно использовать в условии на дальнейшее выполнение макроса?

[Ameli1]

Чтобы обратиться к полю закрытой таблицы, используем функцию DLookUp("[название поля]","[название таблицы]","условия отбора, если требуются").
Чтобы проверить, не пуста ли текстовая "ячейка", то:
If DLookUp("[название поля]","[название таблицы]") <> "" Then

[denis.ta-com]

Ameli1 огромное спасибо, работает.
Посоветуйте, плиз, справочник команд для VBA Access, очень бы пригодился.

[alvk]

Сообщение от denis.ta-com

Ameli1 огромное спасибо, работает.
Посоветуйте, плиз, справочник команд для VBA Access, очень бы пригодился.

Бросьте вы это дело, нормальные программисты в Акцесс этим не пользуются.
Посмотрите вот эту ссылку:
http://www.cyberforum.ru/ms-access/thread389099.html


p.s. Ameli, не знал, что ты тоже тут бываешь, рад видеть.

[denis.ta-com]

Спасибо буду просвещаться.

[Dvoishnik]

мне кажется вопрос по теме будет не подскажете, как проверить поле на пустоту в запросе
я пробовал так

SELECT sum( cena*kolvo) 
FROM postavshiki INNER JOIN (nakladnaya INNER JOIN ((articul INNER JOIN postyplenie ON articul.art = postyplenie.art) INNER JOIN s_razmer ON postyplenie.k_razm = s_razmer.k_razm) ON nakladnaya.n_postvk = postyplenie.n_postvk) ON postavshiki.k_postavshik = nakladnaya.k_postavshik 
WHERE (((nakladnaya.Plan_date_pos)>=42368 And (nakladnaya.Plan_date_pos)<=42368) and (data_postvk = null) );

в БД есть поле data_postvk типа дата пустое. и есть несколько заполненных

WHERE (((nakladnaya.Plan_date_pos)>=42368 And (nakladnaya.Plan_date_pos)<=42368) and (data_postvk <> 0) );

допустим работает верно
знаю как решить вложенным запросом но не хочется лишний раз мудрить.

так за работало.

WHERE (((nakladnaya.Plan_date_pos)>=42368 And (nakladnaya.Plan_date_pos)<=42368) and not(data_postvk <>null) );