Создание нового PDF-документа с помощью AcroEXch в VBScript
Я хочу автоматизировать преобразование листа Excel в документ pdf (я не хочу вручную распечатывать отчет, созданный в Excel, как документ pdf каждое утро). На данный момент я хотел бы создать кнопку в Excel, которая будет запускать макрос для автоматического создания PDF-документа, но эта кнопка в конечном итоге не будет использоваться.
Я тоже новичок в VB, но читал о AcroEXch SDK. Похоже, я должен использовать AcroEXch.PDDoc.Create, но это не совсем правильно (потому что я не могу указать входной файл, который будет напечатан / создан как новый документ pdf).
Есть идеи, как создать новый файл PDF? Заранее спасибо.
Ответы 3
Вы рассматривали CuteFTP или PDFCreator, оба они бесплатны. Я успешно использовал PDFCreator с VBA и слышал, что CuteFTP - это хорошо.
Думаю, я нашел ответ. Вот одно решение, которое предложил кто-то на работе (если кто-то сочтет его полезным, то отлично).
В классе AcroEXch (или в наборе методов, о которых я знаю) нет доступного метода для перерабатывать файла, отличного от pdf, в файл pdf. Вместо этого вам нужно использовать pdf Distiller, чтобы сначала преобразовать файл в postscript, а затем вы можете записать в pdf, используя класс PDFDistiller. Вот фрагмент кода:
'1. open excel конвертируется в pdf:
xlReport.activate
xlReport.range ("a1"). select
тусклый PdfFilePath PdfFilePath = ""
тусклый PsFilePath PsFilePath = ""
'2. Распечатать файл Excel в файл postscript xlBook.activesheet.PrintOut,, 1,, «Adobe PDF на Ne01:», ИСТИНА,, PsFilePath
Dim oDistiller Установите oDistiller = CreateObject ("PDFDistiller.PDFDistiller.1")
oDistiller.FileToPDF sPsFilePath, sPdfFilePath, ""
'Закройте Excel - не сохраняйте. 'КОММЕНТАРИРОВАНЫ НИЖЕ 3 СТРОКИ ДЛЯ ОТЛАДКИ xlApp.displayalerts = ложь xlApp.quit установить xlApp = ничего
Я не знаю точно, каковы ваши обстоятельства и к каким инструментам у вас есть доступ, но, читая ваше описание, похоже, что вы просто хотите преобразовать файл Excel для вас одним щелчком мыши.
Было бы полезно, если бы вы сообщили, есть ли у вас Adobo Acrobat Professional, последняя версия Excel или другие конвертеры, доступные на рынке.
Если у вас установлен Acrobat Pro, ваши офисные приложения (word, excel, outlook и т. д.) Уже должны иметь кнопку «Преобразовать в PDF» на панелях инструментов, в сочетании с Аргумент командной строки Excel не должно быть слишком сложно подготовить Windows Scheduled Задача, которая периодически конвертирует файлы Excel за вас.