MS Access - #Name? ошибка в источнике управления для текстового поля с VBA и выражением - PullRequest
0 голосов
/ 08 января 2020

Я работаю над отчетом, который использует несколько текстовых полей из таблицы для различных меток в отчете, и одно поле предназначено для заполнения изображения. Это поле, photoFileName, является строкой файла изображения, например, IMG_10.JPG. Я использую VBA для сохранения отчетов в отдельных файлах на основе группы; отчет сгруппирован по полю tankID в таблице, и я хочу, чтобы каждая группа сохранялась в отдельный файл PDF. Эта часть работает, так как в каждом PDF-файле есть правильное имя файла, макет и заполненные текстовые поля, но с этим VBA изображения больше не отображаются ни в одном из сохраненных PDF-файлов.

Группировка работает правильно, и метки, использующие не photoFileName поля в отчете, заполняются правильно. Только изображение, которое использует выражение =[CurrentProject].[Path] & "\ResizedPhotos\" & [photoFileName] для своего источника управления, не работает, и в результате изображение не отображается. Я попытался отладить текстовое поле с тем же выражением выше, и оно показывает только значение #Name?. Если я просто введу photoFileName в источник управления, появится правильное значение. Это не работает только в выражении.

Вот справочник VBA:

Sub macro1()

    Set tankIDs = CurrentDb.OpenRecordset("SELECT DISTINCT tankID FROM [photoLog]")

    With tankIDs
        Do Until .EOF
            DoCmd.OpenReport "Photo Appendix", _
                acViewPreview, _
                WhereCondition:="tankID = " & Chr(34) & !tankID & Chr(34), _
                WindowMode:=acHidden

            DoCmd.OutputTo acOutputReport, _
                "Photo Appendix", _
                acFormatPDF, _
                "E:\Photo log\test\" & !tankID & ".pdf"

            DoCmd.Close acReport, "Photo Appendix", acSaveNo

            .MoveNext
        Loop
    End With

End Sub
Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...