Я думаю, что нашел ответ. Вот одно решение, предложенное кем-то на работе (если кто-то посчитает его полезным, то отлично).
В классе AcroEXch (или наборе известных мне методов) нет доступных методов для преобразования не PDF-файла в PDF-файл. Вместо этого вы должны использовать pdf Distiller, чтобы сначала преобразовать файл в postscript, а затем вы можете записать в pdf, используя класс PDFDistiller. Вот фрагмент кода:
1. Open Excel конвертируется в PDF:
xlReport.activate
xlReport.range ( "a1"). выберите
dim PdfFilePath
PdfFilePath = ""
dim PsFilePath
PsFilePath = ""
2. Распечатать файл Excel в файл postscript
xlBook.activesheet.PrintOut,, 1, "Adobe PDF на Ne01:", TRUE,, PsFilePath
Dim oDistiller
Set oDistiller = CreateObject ("PDFDistiller.PDFDistiller.1")
oDistiller.FileToPDF sPsFilePath, sPdfFilePath, ""
'Закрыть Excel - не сохранять.
КОММЕНТАРИЙ ВНИЗ 3 ЛИНИИ ДЛЯ ОТЛАДКИ
xlApp.displayalerts = ложь
xlApp.quit
установить xlApp = none