Конвертируйте файл XLTX в PDF через VBA в Access

Question

Мне нужно сделать файл «Сохранить как» в Excel на нашем общем диске в формате PDF в нашей базе данных Access, используя VBA. В настоящее время пользователь должен go в Файл -> 'Сохранить как Adobe PDF' сотни раз в день для каждого файла Excel, который он создает.

Данные сначала экспортируются из Access в шаблон Excel, как это делается. файл Excel генерируется. Отсюда, после создания Excel, я хотел бы выполнить команду «Сохранить как».

Answer 1

Это то, что я использую в своем проекте:

Set oExcel = GetObject(, "Excel.Application")
With oExcel
    .Workbooks.Open "C:\MyExcel.xlsx", UpdateLinks:=0
    .ScreenUpdating = False
    .Visible = False   
    .DisplayAlerts = False
    .ErrorCheckingOptions.BackgroundChecking = False
End With
ActiveWorkbook.ExportAsFixedFormat Type:=xlTypePDF, FileName:="C:\MyPDFFile.pdf"

В ExportAsFixedFormat встроена функция доступа.