Гость
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Макрос не видит запросы и таблицы / 6 сообщений из 6, страница 1 из 1
23.07.2017, 22:44
    #39493697
univerius
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Макрос не видит запросы и таблицы
Доброго дня.
Есть Таблица1 с полями "Код", "Контрагент", "№ договора" и т.д.

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

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



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

делаю макрос:
Код: plsql
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.
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.

Тоже самое если ссылаюсь на любую таблицу или запрос на любое поле. Если ссылаться на объект в форме , то всё без проблем работает. Что не так?
...
Рейтинг: 0 / 0
23.07.2017, 22:56
    #39493699
Akina
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Макрос не видит запросы и таблицы
univeriusЕсть запрос NoDoc который отбирает из этой таблице 2 поля "Код" и "№ договора" и так же из всех значений находит самый максимальный Код

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


Код: plsql
1.
2.
3.
SELECT TOP 1 Таблица1.Код, Таблица1.[№ документа]
FROM Таблица1
ORDER BY Таблица1.Код DESC;
...
Рейтинг: 0 / 0
23.07.2017, 23:04
    #39493702
univerius
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Макрос не видит запросы и таблицы
Дык запрос то работает исправно. Вопрос в том как из этого запроса вытянуть значение поля "№ документа" ?
...
Рейтинг: 0 / 0
23.07.2017, 23:07
    #39493703
guest_rusimport
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Макрос не видит запросы и таблицы
univerius,
fix

Код: vbnet
1.
2.
3.
...
TempVars.Add "Number", .[№ документа]
...



или
Код: vbnet
1.
2.
3.
...
TempVars.Add "Number", Screen.ActiveDatasheet.[№ документа]
...
...
Рейтинг: 0 / 0
23.07.2017, 23:19
    #39493705
univerius
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Макрос не видит запросы и таблицы
Сделал через она***е отверстие. На основе этого запроса сделал форму. И уже из формы макросом выдернул значение поля. Напрямую из запроса не получается.
...
Рейтинг: 0 / 0
23.07.2017, 23:52
    #39493708
guest_rusimport
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Макрос не видит запросы и таблицы
univerius,
обмешулился малость ... так надо
Код: vbnet
1.
2.
3.
...
TempVars.Add "Number", Screen.ActiveDatasheet.Recordset.Fields("№ документа").Value
...
...
Рейтинг: 0 / 0
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Макрос не видит запросы и таблицы / 6 сообщений из 6, страница 1 из 1
Целевая тема:
Создать новую тему:
Автор:
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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