Экспорт книги MS Excel 2003 в PDF через VBA

Question

У меня есть книга Excel 2003, в которой содержится макрос, позволяющий скопировать некоторые из его листов в новую книгу, а затем сохранить и закрыть новую книгу. Он делает это несколько десятков раз, каждый раз немного различаясь.

Я хотел бы добавить дополнительный макрос в макрос для экспорта электронных таблиц дополнительных книг в PDF. Очевидный способ сделать это - использовать PDF-принтер и встроенную в Excel функцию печати, но большинство PDF-принтеров предоставляют диалоговое окно «Сохранить как ...» до завершения. Очевидно, что ввод этого по отдельности для семидесяти с лишним случаев лишен привлекательности - поэтому я бы хотел что-то, что позволило бы мне установить его заранее (возможно, «Использовать имя файла, который я печатаю, без его расширения»), а затем просто выбрать параметры по умолчанию.

Есть идеи для бесплатного принтера PDF, который делает это? Или подходящая альтернатива?

Answer 1

Office 2007 допускает это. Я считаю PDFCreator хорошим, VBA включен в файлы примеров, и слышал, что CutePDF также хорош. PDFCreator и CutePDF бесплатны.

Answer 2

Как развитие (мудрого) ответа от Remou , и так как это помогло мне решить мою проблему.

Я выбираю pdfcreator (поскольку он у меня уже установлен), и вот что я в итоге использовал:

Sub PDF_Print() 
    Dim p 
    p = ActivePrinter 
    ActivePrinter = "PDFCreator" 
    ActiveDocument.PrintOut 
    ActivePrinter = p 
End Sub 

Работает как шарм

Answer 3

Это может помочь: http://www.pdf995.com

Одной из функций является «Три опции автоматического имени для обхода диалога« Сохранить как »»