メインコンテンツへスキップ

複数のWord文書を一括でPDFファイルに変換する方法

Author: Siluvia Last Modified: 2025-08-06

Wordの「名前を付けて保存」機能を使用して、単一のWord文書をPDFに変換するのは簡単です。しかし、フォルダー内のすべてのWord文書を一度に個別のPDFファイルに変換する必要がある場合はどうすればよいでしょうか?このガイドでは、Wordで複数のWord文書をPDFファイルに一括変換する方法を紹介します。

VBAを使用して複数のWord文書を一括でPDFファイルに変換
Kutools for Wordを使用して複数のWord文書を一括でPDFファイルに変換

 

VBAを使用して複数のWord文書を一括でPDFファイルに変換

以下のVBAコードを使用すると、フォルダー内のすべてのWord文書を一度にPDFファイルに迅速に変換できます。次の手順に従ってください:

  1. Wordで Alt + F11 を押して、Microsoft Visual Basic for Applications ウィンドウを開きます。
  2. エディターで、「挿入」>「モジュール」をクリックし、次のVBAコードをモジュールウィンドウにコピー&ペーストします。
    Sub ConvertWordsToPdfs()
    'Updated by Extendoffice 20181123
        Dim xIndex As String
        Dim xDlg As FileDialog
        Dim xFolder As Variant
        Dim xNewName As String
        Dim xFileName As String
        Set xDlg = Application.FileDialog(msoFileDialogFolderPicker)
        If xDlg.Show <> -1 Then Exit Sub
        xFolder = xDlg.SelectedItems(1) + "\"
        xFileName = Dir(xFolder & "*.*", vbNormal)
        While xFileName <> ""
            If ((Right(xFileName, 4)) <> ".doc" Or Right(xFileName, 4) <> ".docx") Then
                xIndex = InStr(xFileName, ".") + 1
                xNewName = Replace(xFileName, Mid(xFileName, xIndex), "pdf")
                Documents.Open FileName:=xFolder & xFileName, _
                    ConfirmConversions:=False, ReadOnly:=False, AddToRecentFiles:=False, _
                    PasswordDocument:="", PasswordTemplate:="", Revert:=False, _
                    WritePasswordDocument:="", WritePasswordTemplate:="", Format:= _
                    wdOpenFormatAuto, XMLTransform:=""
                ActiveDocument.ExportAsFixedFormat OutputFileName:=xFolder & xNewName, _
                    ExportFormat:=wdExportFormatPDF, OpenAfterExport:=False, OptimizeFor:= _
                    wdExportOptimizeForPrint, Range:=wdExportAllDocument, From:=1, To:=1, _
                    Item:=wdExportDocumentContent, IncludeDocProps:=True, KeepIRM:=True, _
                    CreateBookmarks:=wdExportCreateNoBookmarks, DocStructureTags:=True, _
                    BitmapMissingFonts:=True, UseISO19005_1:=False
                ActiveDocument.Close
            End If
            xFileName = Dir()
        Wend
    End Sub
    Module window with the above code pasted
  3. コードを実行するために F5 を押します。
  4. 「参照」ダイアログが表示されます。PDFに変換したいWord文書が含まれているフォルダーを選択し、「OK」をクリックします。
    Browse dialog box

選択したフォルダー内のすべてのWord文書が個別のPDFファイルに変換されます。

All Word documents in the selected folder are converted to separate PDF files

Kutools for Wordを使用して複数のWord文書を一括でPDFファイルに変換

VBAコードが扱いにくい場合、Kutools for Wordの「文書変換」機能を試すことができます。このツールは、Wordでの手動操作と比較して、プロセスを簡素化し、より効率的かつ使いやすくします。

Kutools for Wordについて、AI 🤖を搭載し、100 以上の便利な機能を提供して作業を簡素化します。
  1. 「Kutools Plus」>「Doc/Docx」をクリックします。
    Doc/Docx button on the Kutools Plus tab on the ribbon
  2. 「文書形式変換」ウィンドウで、次の手順に従います:
    1. 「形式変換」ドロップダウンメニューから「DocxをPdfに変換」を選択します。
    2. クリックします。 Add button 文書を追加するために:
      Add menu
      • 個別の文書を追加するには「ファイル」を選択します。
      • 特定のフォルダーからすべての文書を追加するには「フォルダー」を選択します。
    3. デフォルトでは、PDFファイルはソースファイルと同じ場所に保存されます。場所を変更するには、「参照」ボタンをクリックします。 Browse button 新しい宛先を選択します。
    4. オプションで、「変換後に元のファイルを削除」チェックボックスをオンにして、PDF作成後に元のファイルを削除します。
    5. オプションで、「元のファイルの変更日を保持」チェックボックスをオンにして、元のファイルのメタデータを保持します。
    6. すべての設定が完了したら、「OK」をクリックします。
    Document Format Converter window

これで、すべての.docx形式の文書が正常にPDFファイルに変換されました。

Kutools for Word は、作業を効率化し、文書処理スキルを向上させる究極の Word アドインです。今すぐ入手してください!

最高のオフィス生産性ツール

Kutools for Word - 100以上の優れた機能でWordの操作をさらに向上!

🤖 Kutools AI FeaturesAIアシスタント / リアルタイムアシスタント / スーパー ポリッシュ(形式を保持) / スーパー トランスレート(形式を保持) / AI編集 / AI校正...

📘 文書マスターページの分割 / 文書の結合 / 選択範囲を各種形式(PDF/TXT/DOC/HTMLなど)でエクスポート / 一括PDF変換...

内容編集複数ファイルにわたる一括検索と置換 /すべての画像のリサイズ / 表の行と列の転置 / 表をテキストに変換...

🧹 簡単クリーン:余分なスペース / セクション区切り / テキストボックス / ハイパーリンクを一掃します。その他の削除ツールは削除グループでご覧いただけます...

クリエイティブ挿入:千位区切りの挿入 / チェックボックスの挿入 / ラジオボタンの挿入 / QRコード / バーコード / 複数画像の挿入 / 他にも挿入グループにて発見...

🔍 高精度選択特定のページ / / 図形 / 見出し段落をピンポイントで選択。さらに多くの 選択 機能でナビゲーションを強化...

スター強化任意の場所へ移動 / 繰り返しテキストの自動挿入 / 複数文書ウィンドウ間の切替 /11 種類の変換ツール...

🌍 40以上の言語に対応:Kutoolsはお好みの言語でお使いいただけます―英語、スペイン語、ドイツ語、フランス語、中国語など40以上の言語をサポート!

Kutools and Kutools Plus tabs on the Word Ribbon
👉これらの機能を体験してみませんか?今すぐKutools for Wordをダウンロード!🚀
 

最高のオフィス生産性ツール

Kutools for Word - 100+ のWord用ツール