VBA Сохранение листа Excel в формате PDF в том же каталоге файлов - PullRequest
0 голосов
/ 02 марта 2020

Я знаю, как сохранить файл Excel в формате PDF в VBA, но мне сказали, что этого недостаточно для отправки файла Excel другому лицу. Мне придется сохранить его в формате PDF в том же каталоге, что и сам лист Excel. Как это работает? Я даже не знаю, с чего начать.

1 Ответ

0 голосов
/ 02 марта 2020
Sub SaveAsPdf()

File_name = ActiveWorkbook.Name
If InStr(Filename, ".") > 0 Then
   Filename = Left(Filename, InStrRev(Filename, ".") - 1)
End If

File_name = ActiveWorkbook.Path & Filename & ".pdf"

ActiveSheet.ExportAsFixedFormat _
    Type:=xlTypePDF, _
    Filename:=File_name, _
    Quality:=xlQualityStandard, _
    IncludeDocProperties:=True, _
    IgnorePrintAreas:=False, _
    OpenAfterPublish:=True

End Sub
Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...