How to batch print the 1st page of multiple Word documents

Printing only the first page of many Word documents is a common need for cover pages, invoices, summaries, or title sheets. However, Microsoft Word does not provide a native “first page only” batch print option. Depending on your setup, there are two practical ways to do this.

• Method 1: Batch print first pages with Kutools for Word
• Method 2: Batch print first pages using a VBA macro

Batch print first page of every document using Kutools

Kutools for Word provides a powerful Batch Printing tool that allows you to apply the same print rule to multiple documents. This includes printing only the first page of each file. You can choose individual documents or whole folders to print, including files stored in subfolders.

1. Open Word. On the ribbon, click Kutools Plus > Batch Printing.

   

2. In the Print Specific Pages window, do the following:
   1. Add documents to print:
      • Click Add Files to select specific Word documents.
      • Or click Add Folder to include all documents in a folder (and its subfolders).
   2. Select First page under the Print Range section.
   3. Click Print.

      

      Tips:

      • Other options in the Print Range let you print the last page, odd or even pages, all pages, or a custom page range across all documents.
      • Enable Print in reverse order to change the page output order, which can help keep printed pages arranged correctly.

When the batch print completes, a result window appears showing the number of documents processed successfully.

Batch print first page of every document with VBA

If you prefer a native solution without add-ins, you can use a VBA macro to print only the first page of each document in a folder.

1. In a new or separate Word document that you do not plan to print, press Alt + F11 to open the VBA editor.
2. Click Insert > Module.

   

3. Paste the macro below into the Module window, then replace C:\YourFolder\ with your own folder path.

   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

4. Press F5 to run the macro.

The macro prints the first page of every Word document in the specified folder. Documents stored in subfolders are not included.

Conclusion

If you want a quick and user-friendly way to print only the first page of multiple documents, Kutools Batch Printing is the easiest option. If you prefer a built-in approach and don’t mind some setup, a VBA macro offers a reusable and flexible alternative.

I hope you found this tutorial helpful. If you’d like to explore more Word tips and practical solutions, please click here to browse our full collection of Word tutorials.