Доброго дня.
Есть Таблица1 с полями "Код", "Контрагент", "№ договора" и т.д.

Есть запрос NoDoc который отбирает из этой таблице 2 поля "Код" и "№ договора" и так же из всех значений находит самый максимальный Код

SELECT Таблица1.Код, Таблица1.[№ документа]
FROM Таблица1
WHERE (((Таблица1.Код)=(SELECT MAX (Код) from Таблица1)));

В результате запроса получается таблица с одной строкой и двумя полями. Так вот нужно выдернуть значение из поля "№ договора".

делаю макрос:

Option Compare Database

'------------------------------------------------------------
' НомерДок1
'
'------------------------------------------------------------
Function НомерДок1()
On Error GoTo НомерДок1_Err

    With CodeContextObject
        DoCmd.OpenQuery "NoDoc", acViewNormal, acReadOnly
        TempVars.Add "Number", .NoDoc![№ Документа]
    End With


НомерДок1_Exit:
    Exit Function

НомерДок1_Err:
    MsgBox Error$
    Resume НомерДок1_Exit

End Function
 

Макрос запрос открывает, а вот переменную не назначает, пишет, Не удается найти имя NoDoc.

Тоже самое если ссылаюсь на любую таблицу или запрос на любое поле. Если ссылаться на объект в форме, то всё без проблем работает. Что не так?

http://www.sql.ru/forum/1266860/makros-ne-vidit-zaprosy-i-tablicy