Vba を使用して pdf に印刷する方法 (例付き)

VBA で次の構文を使用すると、現在アクティブな Excel シートを PDF に印刷できます。

 SubPrintToPDF ()

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

End Sub

この特定のマクロは、現在アクティブな Excel シートをmy_data.pdfという名前の PDF に印刷し、現在のフォルダーに保存します。

注 #1 :ファイル名引数に完全なファイル パスを含めて、PDF を特定のフォルダーに保存することもできます。

注 #2 : OpenAfterPublish:= True行は、PDF がエクスポートされたらすぐに開くように VBA に指示します。エクスポート後に PDF を開いたくない場合は、この引数を省略できます。

注 #3 : ExportAsFixedFormatメソッドで唯一必須の引数はTypeです。シートを PDF 形式で印刷するには、これをxlTypePDFに設定する必要があります。

次の例は、このマクロを実際に使用する方法を示しています。

例: VBA を使用して Excel シートを PDF にエクスポートする

さまざまなバスケットボール選手に関する情報を含む次の Excel シートがあるとします。

ここで、このシートをmy_data.pdfという PDF にエクスポートするとします。

これを行うには、次のマクロを作成できます。

 SubPrintToPDF ()

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

End Sub

このマクロを実行すると、Excel シートが PDF にエクスポートされ、PDF が自動的に開きます。

枠線と塗りつぶしの色を含む正確なセルの書式設定が PDF に含まれていることに注意してください。

注: VBA のExportAsFixedFormatメソッドの完全なドキュメントは、ここで見つけることができます。

追加リソース

次のチュートリアルでは、VBA で他の一般的なタスクを実行する方法について説明します。

VBA: フォルダーの作成方法
VBA：フォルダーを削除する方法
VBA: ファイルを削除する方法