批量打印多個 Word 文檔的特定頁面的 2 種快速方法

Word解決方案 2025 年 9 月 28 日
立即分享：

在下面的文章中，我們想與您分享兩種快速批量打印多個 Word 文檔特定頁面的方法。

批量打印文件對我們許多人來說絕對是一件幸事。 它可以節省打開每個文件的時間以及幾次點擊。 現在如何批量打印多個 Word 文檔的特定頁面？ 例如，同時打印多個文件的第一頁會很有用。 此外，還需要打印多個文件的“目錄”或“參考”頁面。 那麼我們能做到嗎？批量打印多個 Word 文檔的特定頁面

是的，答案很簡短。 最棒的是我們不需要任何第三方加載項。

方法一：批量打印多個文檔的第一頁

  1. 首先，將所有目標文件儲存在同一個目錄下。
  2. 然後單擊“開發人員”選項卡和“Visual Basic”以打開 VBA 編輯器。 或者按“Alt+ F11”代替。單擊“開發人員”->單擊“ Visual Basic”
  3. 接下來，單擊“普通”，然後單擊“插入”。
  4. 在下拉菜單上選擇“模塊”。單擊“常規”->單擊“插入”->單擊“模塊”
  5. 現在將有一個新模塊。 雙擊它以顯示編輯空間。
  6. 將宏粘貼到模塊上：
Sub BatchPrintTheSpecifiedPagesOfWordDocuments()
  Dim objWordApplication As New Word.Application
  Dim strFile As String
  Dim strFolder As String

  strFolder = InputBox("Enter the folder address", "Folder Address", "For example:E:\test word\test\")
  strFile = Dir(strFolder & "*.doc*", vbNormal)
 
  While strFile <> ""
  With objWordApplication
    .Documents.Open (strFolder & strFile)
    .ActiveDocument.PrintOut Range:=wdPrintRangeOfPages, Copies:=1, Pages:=“1”
    .ActiveDocument.Close
  End With
  strFile = Dir()
  Wend
 
  Set objWordApplication = Nothing 
End Sub
  1. 接下來單擊“運行”按鈕或按“F5”。粘貼宏->點擊“運行”
  2. 在彈出的框中，輸入保存文件的文件夾路徑，如“E:\測試詞\測試\“。 不要忘記最後一個“\”. 單擊“確定”繼續。輸入文件夾路徑->單擊“確定”

就等印刷好了。

方法 2：批量打印多個文檔的特定頁面

為了打印多個文檔的特定頁面，您可以使用以下宏。

使用方法 1 中的相同步驟安裝和運行宏，但替換為以下宏：

Sub BatchPrintTheSpecifiedPagesOfWordDocuments()
  Dim objWordApplication As New Word.Application
  Dim strFile As String
  Dim strFolder As String
  Dim strPages As String

  strFolder = InputBox("Enter the folder address", "Folder Address", "For example:E:\test word\test\")
  strFile = Dir(strFolder & "*.doc*", vbNormal)
  strPages = InputBox("Enter the Pages you want to print out", "Specified Pages", "For example:1,2")
 
  While strFile <> ""
    With objWordApplication
      .Documents.Open (strFolder & strFile)
      .ActiveDocument.PrintOut Range:=wdPrintRangeOfPages, Copies:=1, Pages:=strPages
      .ActiveDocument.Close
    End With
  strFile = Dir()
  Wend
 
  Set objWordApplication = Nothing 
End Sub

同樣，在第一個方塊中輸入資料夾路徑。然後在第二個方塊中輸入頁碼。若要列印連續頁面，請使用連字號分隔起始頁碼和結束頁碼，例如「1-3」。若要列印不連續的頁面，請使用逗號分隔，例如「1, 3, 5」。例如，「1, 3-6」表示列印第1、3、4、5和6頁。輸入頁碼->點擊“確定”

您需要的維修工具

碰巧 Word 突然停止響應，使您的文檔卡住。 繼承損壞的文件的可能性很高 損壞的詞. 有時後果不堪設想。 您可能會責怪自己沒有進行備份。 但您需要做的更重要的事情是獲取恢復產品以立即檢索數據。

作者簡介：

陳薇薇（Vera Chen）是 DataNumen，Inc.是數據恢復技術的全球領導者，包括 損壞的Excel 以及 pdf 維修軟件產品。 欲了解更多信息，請訪問 萬維網。datanumen.COM

立即分享：

評論被關閉。