【VBA】ﾜｰｸｼｰﾄ印刷範囲の高速PDF化

◆解説
面倒な
・プリンターの設定変更　や
・ファイル名を都度指定
が不要になるPDF化方法です。

◆ソースコード

Sub printPDF()
    Dim fileSaveName As String
    fileSaveName = "C:\tmp.pdf"    '変換するPDFファイル名

    ActiveSheet.ExportAsFixedFormat _
        Type:=xlTypePDF, _
        Filename:=fileSaveName, _
        OpenAfterPublish:=True
End Sub

◆補足１
ページ設定属性 (左余白、下余白、用紙サイズなど)を設定したい場合は、以下のURLを参考に追記します。
https://learn.microsoft.com/ja-jp/office/vba/api/excel.pagesetup

◆補足２
PDF化の属性 (ビューアーにファイルが表示する・しない、発行を開始するページを指定する・しないなど)を設定したい場合は、以下のURLを参考に追記します。
https://learn.microsoft.com/ja-jp/office/vba/api/excel.workbook.exportasfixedformat

◆登録方法