2016-05-03 4 views
0

Я бы хотел напечатать на .pdf все записи запроса, используя отчет. У меня более 1 тыс. Записей, и я хотел бы сохранить каждую запись как .pdf. Я связал поле «имя файла» в запросе с намерением сохранить отчет, используя поле «filename». Конечным результатом будет щелчок по кнопке «print?». и база данных будет печатать на .pdf каждой записи и сохранять файл на основе поля «filename».Печать в .pdf и сохранение с использованием определенного имени файла

Я просто не знаю, как написать vba.

Доклад: ТЕМП-Print-КОНТРОЛЬНЫЙ Запрос: ТЕМП-Print Сохранить в: C: \ Users \ mabanes \ Desktop \ TC

С чего начать?

+0

Не знаете, что вы здесь делаете. Возможно, вам нужно решение, подобное одному из ответов на [этот вопрос] (http://stackoverflow.com/q/11498794/77335). Если это правда, ожидаете ли вы кого-нибудь написать свой код для вас? – HansUp

ответ

0
Dim rs as ADODB.Recordset 

rs.Open "TEMP-Print",CurrentProject.Connection 

Do While Not rs.Eof 
    'somehow either edit the query here so that the report only takes the record you need for the particular PDF file 
    DoCmd.OutputTo acOutputReport, "TEMP-Print-CHECKLIST", acFormatPDF, " C:\Users\mabanes\Desktop\TC\" & rs.Fields("filename") & ".pdf", False 
    rs.MoveNext  
Loop 
+0

Скопировано/вставлено код. Получено диалоговое окно Microsoft Visual Basic - Ошибка времени выполнения «-2147221164 (80040154)»: - Класс не зарегистрирован Существует много противоречивой информации об этой ошибке ... –

+0

Какую версию доступа вы используете? В строке кода вы получили ошибку? –

+0

Ошибка в строке: rs.Open «TEMP-Print», CurrentProject.Connection Доступ к 2007 году - 2010 –

Смежные вопросы