【Excel】エクセルでブック全体をpdfに変換（全てのシートを1つのpdfに：分割：別々：分割される）する方法【複数シート】

この記事では、エクセルでブック全体をpdfに変換（全てのシートを1つのpdfに：分割：別々：分割される）する方法【複数シート】について解説していきます。

エクセルでブック全体をpdfに変換したい時は、

pdfに変換する際にオプション設定で［ブック全体］を選択する

とよいです。

さらにブック全体（全シート）を分割した別々のpdfに変換する方法も紹介します。

それでは実際のサンプルを用いて、詳しい設定方法を見ていきましょう。

エクセルでブック全体（全シート）を1つのpdfに変換する方法【分割されないように：まとめる】
エクセルでブック全体（全シート）を分割した別々のpdfに変換する方法
まとめエクセルでブック全体をpdfに変換（別々：分割される）する方法【複数シート】

エクセルでブック全体（全シート）を1つのpdfに変換する方法【分割されないように：まとめる】

エクセルでブック全体（全シート）を1つのpdfに変換したい場合は、pdfに変換する際にオプション設定で［ブック全体］を選択するとよいです。

以下のサンプルは、Sheet1からSheet3までの3シートで1ブックとなっていて、それぞれのシートのB2セルにシート名を入力してあるものです。

これからこの3シートを1つのpdfに変換する方法を解説します。

［ファイル］タブをクリックします。

［エクスポート］を選択し、［PDF/XPSの作成］をクリックします。

保存先を選択する画面で、［オプション］をクリックします。

発行対象で［ブック全体］にチェックを付けて、［OK］をクリックします。

ファイル名を付けて、保存先を選んだら［発行］をクリックします。

これでブック全体（全シート）を1つのpdfに変換することができました。

保存したpdfを開いて確認すると、確かにSheet1からSheet3までの3シートが1つのpdfに変換されていました。

エクセルでブック全体（全シート）を分割した別々のpdfに変換する方法

エクセルでブック全体（全シート）を分割した別々のpdfに変換したい場合は、VBAを使うとよいです。

VBAを使うのが初めてでも、わかりやすく解説しますのでぜひ参考にしてください。

まずはVBAの設定画面を開くために［Altキー］と［F11キー］を同時に押します。

すると以下のような画面が開きます。

ここに以下のVBAコード（SubからEnd Subまですべて）をコピーして貼り付けます。

Sub シートごとに分割してpdfに変換()
    Dim ws As Worksheet
    Dim savePath As String
    Dim fileName As String
    
    ' フォルダの選択ダイアログを表示
    With Application.FileDialog(msoFileDialogFolderPicker)
        .Title = "保存先フォルダを選択してください"
        If .Show = -1 Then
            savePath = .SelectedItems(1)
        Else
            Exit Sub
        End If
    End With
    
    ' 各シートをPDFにエクスポート
    For Each ws In ActiveWorkbook.Worksheets
        fileName = ws.Name & ".pdf"
        ws.ExportAsFixedFormat Type:=xlTypePDF, _
            Filename:=savePath & "\" & fileName, _
            Quality:=xlQualityStandard, IncludeDocProperties:=True, _
            IgnorePrintAreas:=False, OpenAfterPublish:=True
    Next ws
    
    MsgBox "PDFファイルが保存されました。", vbInformation, "完了"
End Sub

このVBAコードは「ブック内の各シートを個別のpdfファイルとして保存し、保存先は都度指定する。また、保存が完了したらpdfを開く。」という内容です。