KutoolsforOffice— 1 つのソリューション、5 つの強力なツール。少ない労力で大きな成果。

Word でドキュメント情報を一括印刷する方法

著者アマンダ・リー変更日

ドキュメントそのものではなく、ファイル名・作成者・ページ数・最終保存日時・総文字数などのドキュメント情報を印刷したい場合があります。Word では単一ファイルの情報は表示・印刷できますが、複数のドキュメントに対して簡単に一括印刷する機能は提供されていません。大量のファイルを扱う際には、これがすぐに手間になってしまいます。

Kutools for Word で一括印刷を開く

このチュートリアルでは、複数のWord ドキュメントからドキュメント情報を一括で印刷する2 つの方法をご紹介します。


Kutools for Word を使用してドキュメント情報を一括印刷

Kutools for Word には一括印刷機能があり、直感的なビジュアルインターフェースで複数のファイルに含まれるドキュメント情報をまとめて印刷できます。

Kutools for Word

Kutools for Word は、コーディングや複雑な設定が一切不要。Microsoft Word に実用的なツールを直接搭載し、日常の文書作業をよりスピーディーにこなすお手伝いをします。

  • AI による文章作成、校正、翻訳、要約
  • 一括検索と置換(複数文書対応)
  • Word 文書を簡単に結合・分割
  • Word と PDF のバッチ変換
  1. Word を開き、KUTOOLS PLUSタブに移動して、一括印刷をクリックします。
    Kutools for Word で一括印刷を開く
  2. 特定のページを印刷ウィンドウで、以下の操作を行ってください。
    1. 印刷したい文書を追加します:
      • クリックしてファイルを追加し、特定のWord 文書を選択します。
      • または、フォルダーを追加をクリックして、フォルダーとそのサブフォルダー内のすべての文書を一括で含めます。
    2. 文書情報タブに切り替えて、文書情報印刷情報セクションから選択してください。
    3. クリックして印刷
      Kutools の一括印刷設定
      ヒント:印刷情報の他のオプションを使用すると、すべての文書でマークアップのリスト、スタイル、キー割り当て、AutoText エントリ、コメントを印刷できます。

一括処理が完了すると、Kutools for Word は正常に印刷されたドキュメントの件数を表示するサマリーウィンドウを表示します。

Kutools for Word の一括印刷結果ダイアログ

注:

  • 一括印刷では、現在Word で選択されているプリンターが使用されます。別のプリンターをご利用になる場合は、事前にファイル>印刷からお選びいただき、その後バッチを実行してください。
    Word でのプリンター選択

メリット

  • 明確な印刷オプションを備えた使いやすいインターフェース
  • 一括印刷向けに特別に設計
  • ファイル数に固定制限なし
  • ファイルを追加またはフォルダー全体を素早く処理
  • 頻繁に行うバッチ処理に最適

デメリット

  • Kutools for Word が必要です

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


VBA を使用してドキュメント情報を一括印刷

この方法では、各ドキュメントを順に処理し、ドキュメント情報を印刷した後、次のレコードに進むシンプルな VBA マクロを使用します。

  1. 印刷する予定のない新しいWord ドキュメント、または別のドキュメントで、Alt + F11を押して VBA エディターを開きます。
  2. 挿入 > モジュールをクリックします。
    [挿入]>[標準モジュール]をクリックして、VBA エディターに新しいモジュールを挿入します
  3. 以下のマクロをモジュールウィンドウに貼り付け、C:\YourFolder\をご自身のフォルダーパスに置き換えます。
    Sub BatchPrintDocumentInformation()
        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 _
                Item:=wdPrintProperties, _
                Background:=False
    
            doc.Close SaveChanges:=wdDoNotSaveChanges
    
            fileName = Dir()
        Loop
    
        Application.ScreenUpdating = True
    End Sub
  4. F5を押してマクロを実行しましょう!

このマクロは、指定したフォルダー内の各Word ドキュメントのドキュメント情報(プロパティ)を印刷します。ただし、サブフォルダーに保存されているドキュメントは対象外です。

注:

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

メリット

  • 1 回の実行でフォルダー全体を印刷
  • ファイル数に固定制限なし
  • 後からカスタマイズ可能(フィルター、ルール、ログ記録)

デメリット

  • マクロはポリシーにより無効化されている可能性があります
  • 基本的な VBA 編集が必要
  • 大量のバッチ処理により一時的にWord が遅くなる場合があります

まとめ

ドキュメント情報を視覚的かつ手軽に一括印刷したいなら、Kutools for Word が最も簡単なスタート方法です。単一のインターフェースで複数ファイルをまとめて処理でき、手作業の繰り返しを回避できます。内蔵機能を好む方や、ある程度の設定をいとわないユーザーには、VBA マクロがより技術的で柔軟な代替手段となります。

このチュートリアルがお役に立てたことを願っています!さらに多くのWord の便利技や実用的なソリューションをご覧になりたい方は、こちらをクリックしてください。すべてのWord チュートリアルを一覧いただけます。