【EXCEL VBA】EXCELで差し込み印刷したい（PDF出力）

EXCELで差し込み印刷（PDF出力）する方法です。EXCEL関数とマクロを組み合わせることで、驚くほど簡単に実現することができます。

ExportAsFixedFormatとVLOOKUPで解決する

まずはデータを準備します。こちらのデータは、疑似個人情報データ生成サービスにて作成しました。

次に、PDF出力したいテンプレートシートを準備します。ここでのポイントは、データを差し込みたいセルをVLOOKUPで記述することです。参照したいデータについては、G1セルにてINDEXを指定しています。カナ、性別、生年月日、電話番号も同様にVLOOKUPを記述しています。

後はG1セルのINDEXをマクロで操作して、PDF出力するのみです。

サンプルプログラムを確認する（コピペOK）

Sub sample()
    Dim i As Integer
    
    For i = 1 To 10
      ActiveSheet.Range("G1") = i
      ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:="d:\tmp\" & Range("C2") & ".pdf"
    Next

End Sub