複数のWord ドキュメントの1 ページ目を一括印刷する方法

著者アマンダ・リー変更日2026-02-06

多数のWord ドキュメントの最初のページだけを印刷したいというニーズは、表紙、請求書、要約、タイトルシートなどの用途でよくあります。しかし、Microsoft Word には「最初のページのみ」を一括で印刷するネイティブ機能が備わっていません。環境に応じて、実用的な方法が2 つあります。

方法1：Kutools で一括最初のページを印刷
方法2：VBA マクロを使用して一括最初のページを印刷

Kutools を使用して各ドキュメントを一括最初のページを印刷

Kutools の一括印刷ツールを使えば、複数のドキュメントに同じ印刷ルールを簡単に適用できます。たとえば、各ファイルの最初のページだけを印刷することも可能です。個別のドキュメントはもちろん、フォルダー全体（サブフォルダー内のファイルを含む）もまとめて選んで印刷できます。

Word を開き、リボンからKUTOOLS PLUS＞一括印刷をクリックします。
特定のページを印刷ウィンドウで、以下の操作を行ってください。
1. 印刷する文書を追加：
  - 特定のWord 文書を選択するには、ファイルを追加をクリックしてください。
  - または、フォルダーを追加をクリックして、フォルダー（およびそのサブフォルダー）内のすべてのドキュメントを一括で取り込みます。
2. 最初のページ下部にある印刷範囲セクションから選択してください。
3. 印刷をクリックしてください。
  ヒント：
  - 印刷範囲内のその他のオプションでは、印刷範囲でドキュメントの最後のページ、奇数ページまたは偶数ページ、すべてのページ、またはカスタムページ範囲を印刷できます。
  - 逆順で印刷を有効にすると、逆順で印刷機能により印刷ページの出力順序が変更され、印刷後にページを正しい順序に並べやすくなります。

一括印刷が完了すると、正常に処理されたドキュメント数を示す結果ウィンドウが表示されます。

注：

一括印刷では、Word で設定された既定のプリンターが使用されます。別のプリンターで印刷したい場合は、バッチ処理を実行する前に、ファイル＞印刷からプリンターを選択してください。

メリット

明確な印刷オプションを備えた使いやすいインターフェース
一括印刷向けに設計（手作業を最小限に）
すべてのドキュメントの印刷範囲を一か所で管理
ファイル数に上限なし
ファイルを追加またはフォルダー全体を素早く処理
繰り返し印刷作業の日常業務をよりスムーズに

デメリット

Kutools for Word が利用可能である必要があります

Word で同じ作業をもっと素早くこなしたいですか？Kutools for Word をぜひお試しください。日々の業務がぐっとラクに。

ダウンロード詳細を見る

VBA を使用して各ドキュメントを一括最初のページを印刷

アドインを使わずネイティブな方法をご希望の場合は、VBA マクロでフォルダー内の各ドキュメントの最初のページのみを印刷できます。

印刷する予定のない新しいWord 文書、または別のWord 文書で、Alt + F11を押して VBA エディターを開きます。
挿入 > モジュールをクリックします。

以下のマクロをモジュールウィンドウに貼り付け、C:\YourFolder\を実際のファイルパスに置き換えます。

Sub BatchPrintFirstPage()
    Dim folderPath As String
    Dim fileName As String
    Dim doc As Document

    ' Set your folder path here (must end with a backslash)
    folderPath = "C:\YourFolder\"
    If Right(folderPath, 1) <> "\" Then folderPath = folderPath & "\"

    fileName = Dir(folderPath & "*.doc*")

    Application.ScreenUpdating = False

    Do While fileName <> ""
        Set doc = Documents.Open( _
            FileName:=folderPath & fileName, _
            ReadOnly:=True, _
            AddToRecentFiles:=False _
        )

        doc.PrintOut Range:=wdPrintRangeOfPages, Pages:="1", Background:=False
        doc.Close SaveChanges:=wdDoNotSaveChanges

        fileName = Dir()
    Loop

    Application.ScreenUpdating = True
End Sub

F5を押して、マクロを実行しましょう！

このマクロは、指定したフォルダー内のすべてのWord ドキュメントの最初のページを印刷します。サブフォルダーに保存されたドキュメントは含まれません。

注記：

マクロは、印刷対象外の別のWord 文書から実行する必要があります。そうしないと、バッチ処理が失敗してしまいます。
マクロを有効にする必要があります。ただし、会社の方針によりマクロがブロックされている場合は、この方法は機能しません。
この方法では、Word で現在選択されているプリンターが使用されます。別のプリンターを使用する場合は、マクロを実行する前にファイル > 印刷から事前に選択してください。