Add a blank page separator

  • Thread starter Thread starter S N
  • Start date Start date
S

S N

How do I add a blank page automatically as a separator after every 15 pages
when printing a document of 250 pages?
 
Use a macro containing the following code to print the document:

Dim i As Long
Dim blank As Document
For i = 1 To 240 Step 15
ActiveDocument.PrintOut Range:=wdPrintFromTo, From:=i, To:=i + 15
Set blank = Documents.Add
With blank
.PrintOut
.Close wdDoNotSaveChanges
End With
Next i


--
Hope this helps,

Doug Robbins - Word MVP

Please reply only to the newsgroups unless you wish to obtain my services on
a paid professional basis.
 
Back
Top