この記事では、Excel VBAを用いて複数のエクセルシートをブックマーク付きのPDFとして保存する方法を詳しくご紹介します。手順の詳細な解説、具体的なコード例、さらに応用例を3つ紹介することで、VBAの使い方の理解を深めることができます。
Excel VBAの基本
Excel VBA（Visual Basic for Applications）は、Microsoft Excelに組み込まれたプログラミング言語です。これを用いると、単純作業の自動化だけでなく、高度なデータ分析やレポート作成も可能になります。
そもそも、どこにVBAコードを書いて、どう実行すれば良いのか分からない場合は、以下の記事をご参照ください。
基本のコード: 複数のエクセルシートをブックマーク付きのPDFで保存
Excel VBAを使うと、複数のシートを1つのPDFファイルとして保存することが容易にできます。以下はその基本的なコード例です。
Sub SaveSheetsAsPDF()
Dim ws As Worksheet
Dim pdfName As String
pdfName = ThisWorkbook.Path & "\Sample.pdf"
' 複数シートを選択
Sheets(Array("Sheet1", "Sheet2")).Select
' PDFとして保存
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:=pdfName, _
Quality:=xlQualityStandard, IncludeDocProperties:=True, _
IgnorePrintAreas:=False, OpenAfterPublish:=True
End Sub
このコードは、”Sheet1″と”Sheet2″という名前の2つのシートを1つのPDFファイルとして”Sample.pdf”という名前で保存します。
コードの解説
1. **ws As Worksheet** : シートを操作するためのWorksheetオブジェクトを宣言します。
2. **pdfName As String** : 保存するPDFのファイル名を保持する変数を宣言します。
3. **Sheets(Array(“Sheet1”, “Sheet2”)).Select** : “Sheet1″と”Sheet2″という2つのシートを選択します。
4. **ActiveSheet.ExportAsFixedFormat** : 選択したシートをPDFとして保存するメソッドです。
応用例
応用例1: シート全体をPDFに保存
通常、選択したセル範囲のみをPDFとして保存することが可能ですが、以下のコードを使用するとシート全体をPDFとして保存することができます。
Sub SaveEntireSheetAsPDF()
Dim pdfName As String
pdfName = ThisWorkbook.Path & "\EntireSheet.pdf"
Sheets("Sheet1").UsedRange.Select
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:=pdfName, _
Quality:=xlQualityStandard, IncludeDocProperties:=True, _
IgnorePrintAreas:=False, OpenAfterPublish:=True
End Sub
応用例2: シートごとにブックマークを設定
ブックマークを設定するためには、各シートを一度PDFとして保存し、それを結合することで実現できます。以下はその一例です。
[詳細なコードは外部リンク先を参照してください。](https://example.com)
応用例3: ファイル名に日付を含める
以下のコードを使用すると、保存するPDFのファイル名に現在の日付を含めることができます。
Sub SavePDFWithDate()
Dim pdfName As String
pdfName = ThisWorkbook.Path & "\Sample_" & Format(Date, "yyyymmdd") & ".pdf"
Sheets("Sheet1").Select
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:=pdfName, _
Quality:=xlQualityStandard, IncludeDocProperties:=True, _
IgnorePrintAreas:=False, OpenAfterPublish:=True
End Sub
まとめ
Excel VBAを使用することで、複数のシートをブックマーク付きのPDFとして効率よく保存することが可能です。このスキルをマスターすることで、日常の業務を大幅に効率化することができます。
VBAも良いけどパワークエリも良い
VBAの解説をしてきましたが、VBAは正直煩雑でメンテナンス性が悪いです。最近はモダンExcelと呼ばれるパワークエリやパワーピボットへのシフトが進んできています。本サイトでもパワークエリの特集をしており、サンプルデータを含む全11回の学習コンテンツでパワークエリを習得することができます。
クリックするとパワークエリの全11講座が表示されます。
-
【初心者向け】パワークエリ入門：ETLツールを使ってエクセルデータを簡単に整形・統合しよう！(1/11)
-
【実践ガイド】パワークエリでデータ収集：Excel、CSV、PDF、Webデータを簡単に取り込む方法をマスターしよう！(2/11)
-
【総力特集】パワークエリで列操作をマスター：選択、変更、移動、削除、結合、分割の詳細解説＆実践テクニック！(3/11)
-
【徹底解説】パワークエリで行操作をマスター！フィルター・保持・削除テクニックと練習用エクセルで実践学習(4/11)
-
パワークエリでデータクレンジング: 文字列結合、0埋め、テキスト関数をマスター(5/11)
-
パワークエリで四捨五入、切り捨て、切り上げをマスターする方法（6/11）
-
パワークエリで効率的なデータグループ化を実現する方法(7/11)
-
パワークエリで時間と日付の計算をマスター！便利な関数を使って効率アップ(8/11)
-
パワークエリで条件別集計をマスターする方法(9/11)
-
Excelパワークエリでクロス集計表とデータベース形式を瞬時に変換する方法(10/11)
-
Excelパワークエリ入門: 効率的なデータ整理をマスターしよう！(11/11)
パワーピボットの記事はありません。興味がある場合は、書籍で学んでみてください
コメント