MS Access: как экспортировать в pdf в альбомной ориентации?
У меня есть сводная диаграмма в MS-Access, которую я хочу экспортировать в виде файла PDF. Как я могу установить полученную ориентацию PDF от портрета до пейзажа?
3 ответа
Решение
Вы можете распечатать его с помощью Cute PDF и установить вывод печати на альбомную
Когда этот код запускается, все, что вы видите, это диалог сохранения файла. Cute PDF должен быть установлен в соответствии с инструкциями на сайте.
Dim stDocName as string
Dim prn As Printer
Dim rpt As Report
stDocName = "your report object name"
Set prn = Application.Printers("CutePDF Writer")
prn.Orientation = acPRORLandscape
DoCmd.OpenReport stDocName, acViewPreview, , , acHidden
Set rpt = Reports(stDocName)
Set rpt.Printer = prn
DoCmd.PrintOut
DoCmd.Close acReport, stDocName
На самом деле есть другой способ - с открытым представлением, которое вы хотите открыть, перейдите в меню "Файл" и выберите "Печать"> "Предварительный просмотр", затем выберите нужный параметр, например, сохраните его в альбомной ориентации, и экспорт PDF запомнит его.