View Single Post
  #3   Report Post  
Posted to microsoft.public.word.docmanagement,microsoft.public.word.formatting.longdocs,microsoft.public.word.pagelayout
Doug Robbins - Word MVP Doug Robbins - Word MVP is offline
external usenet poster
 
Posts: 8,832
Default Add a blank page separator

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.

"S N" wrote in message
...
How do I add a blank page automatically as a separator after every 15
pages when printing a document of 250 pages?