Add a blank page separator

[S N]

How do I add a blank page automatically as a separator after every 15 pages
when printing a document of 250 pages?

[Doug Robbins - Word MVP]

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.

Post by S N
How do I add a blank page automatically as a separator after every 15
pages when printing a document of 250 pages?