複数のWord文書を一括でPDFファイルに変換する方法
Wordの「名前を付けて保存」機能を使用して、単一のWord文書をPDFに変換するのは簡単です。しかし、フォルダー内のすべてのWord文書を一度に個別のPDFファイルに変換する必要がある場合はどうすればよいでしょうか?このガイドでは、Wordで複数のWord文書をPDFファイルに一括変換する方法を紹介します。
VBAを使用して複数のWord文書を一括でPDFファイルに変換
Kutools for Wordを使用して複数のWord文書を一括でPDFファイルに変換
VBAを使用して複数のWord文書を一括でPDFファイルに変換
以下のVBAコードを使用すると、フォルダー内のすべてのWord文書を一度にPDFファイルに迅速に変換できます。次の手順に従ってください:
- Wordで Alt + F11 を押して、Microsoft Visual Basic for Applications ウィンドウを開きます。
- エディターで、「挿入」>「モジュール」をクリックし、次の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
- コードを実行するために F5 を押します。
- 「参照」ダイアログが表示されます。PDFに変換したいWord文書が含まれているフォルダーを選択し、「OK」をクリックします。
選択したフォルダー内のすべてのWord文書が個別のPDFファイルに変換されます。

Kutools for Wordを使用して複数のWord文書を一括でPDFファイルに変換
VBAコードが扱いにくい場合、Kutools for Wordの「文書変換」機能を試すことができます。このツールは、Wordでの手動操作と比較して、プロセスを簡素化し、より効率的かつ使いやすくします。
- 「Kutools Plus」>「Doc/Docx」をクリックします。
- 「文書形式変換」ウィンドウで、次の手順に従います:
- 「形式変換」ドロップダウンメニューから「DocxをPdfに変換」を選択します。
- クリックします。
文書を追加するために:
- 個別の文書を追加するには「ファイル」を選択します。
- 特定のフォルダーからすべての文書を追加するには「フォルダー」を選択します。
- デフォルトでは、PDFファイルはソースファイルと同じ場所に保存されます。場所を変更するには、「参照」ボタンをクリックします。
新しい宛先を選択します。
- オプションで、「変換後に元のファイルを削除」チェックボックスをオンにして、PDF作成後に元のファイルを削除します。
- オプションで、「元のファイルの変更日を保持」チェックボックスをオンにして、元のファイルのメタデータを保持します。
- すべての設定が完了したら、「OK」をクリックします。
これで、すべての.docx形式の文書が正常にPDFファイルに変換されました。
最高のオフィス生産性ツール
Kutools for Word - 100以上の優れた機能でWordの操作をさらに向上!
🤖 Kutools AI Features:AIアシスタント / リアルタイムアシスタント / スーパー ポリッシュ(形式を保持) / スーパー トランスレート(形式を保持) / AI編集 / AI校正...
📘 文書マスター:ページの分割 / 文書の結合 / 選択範囲を各種形式(PDF/TXT/DOC/HTMLなど)でエクスポート / 一括PDF変換...
✏ 内容編集:複数ファイルにわたる一括検索と置換 /すべての画像のリサイズ / 表の行と列の転置 / 表をテキストに変換...
🧹 簡単クリーン:余分なスペース / セクション区切り / テキストボックス / ハイパーリンクを一掃します。その他の削除ツールは削除グループでご覧いただけます...
➕ クリエイティブ挿入:千位区切りの挿入 / チェックボックスの挿入 / ラジオボタンの挿入 / QRコード / バーコード / 複数画像の挿入 / 他にも挿入グループにて発見...
🔍 高精度選択:特定のページ / 表 / 図形 / 見出し段落をピンポイントで選択。さらに多くの 選択 機能でナビゲーションを強化...
⭐ スター強化:任意の場所へ移動 / 繰り返しテキストの自動挿入 / 複数文書ウィンドウ間の切替 /11 種類の変換ツール...
🌍 40以上の言語に対応:Kutoolsはお好みの言語でお使いいただけます―英語、スペイン語、ドイツ語、フランス語、中国語など40以上の言語をサポート!

最高のオフィス生産性ツール
Kutools for Word - 100+ のWord用ツール
- 🤖 Kutools AI Features:AIアシスタント / リアルタイムアシスタント / スーパー ポリッシュ / スーパー トランスレート / AI編集 / AI校正
- 📘 文書マスター:ページの分割 / 文書の結合 / 一括PDF変換
- ✏ 内容編集:一括検索と置換 /すべての画像のリサイズ
- 🧹 簡単クリーン:余分なスペースの削除 / セクション区切りの削除
- ➕ クリエイティブ挿入:千位区切りの挿入 / チェックボックスの挿入 / QRコードの作成
- 🌍 40以上の言語に対応:Kutoolsはあなたの言語に対応 ―40以上の言語をサポート!