Excel VBA を使用して PDF に印刷するにはどうすればよいでしょうか?

Excel VBA を使用して PDF に印刷するにはどうすればよいでしょうか?

タイトルが示すように... 自動化を拡張して PDF への直接印刷を含めようと考えています。 作成したマクロは、必要に応じて印刷領域とページ設定を既にフォーマットしています。 しかし、マクロを記録しようとすると、印刷、プリンターの変更、ファイルへの保存に関する何もキャプチャされません。

これを実現する方法はありますか? 保存場所のプロンプトだけが必要であれば、なんとかなるかもしれません。ファイル名は、スプレッドシート内の既存の情報を取得して自動生成できると思います。

答え1

Excel 2010以降を使用している場合、ExcelにはファイルをPDF形式で保存できる内部アドインが用意されています。ファイルを
PDFとして保存するには、マクロで次のコードを使用します。

ActiveSheet.ExportAsFixedFormat タイプ:=xlTypePDF、ファイル名:= _
        "C:\Users\46506090\Desktop\Book1.pdf", 品質:=xlQualityStandard, _
        IncludeDocProperties:=True、IgnorePrintAreas:=False、OpenAfterPublish:= _
        真実  

ここでパスを置き換えることができますC:\Users\46506090\Desktop\Book1.pdfファイル名はお好みで付けてください。

編集:作業中のシートだけでなく、ワークブック全体をPDFとして公開する場合は、Activeを置き換えてください。シート.ExportAsFixedFormat をアクティブにするワークブック.固定形式でエクスポート

関連情報