View Single Post
  #3   Report Post  
Doug Robbins
 
Posts: n/a
Default

If you run the following macro when the document created by executing the
merge is the active document, it will send the set of 18 pages for each
record to the printer as a separate print job.

Dim i As Long
With ActiveDocument
For i = 1 To .Sections.Count
.PrintOut Range:=wdPrintFromTo, From:="s" & i, To:="s" & i
Next i
End With


--
Hope this helps.

Please reply to the newsgroup unless you wish to avail yourself of my
services on a paid consulting basis.

Doug Robbins - Word MVP
"Dan Schwab" Dan wrote in message
...
I am trying to merge 1,800 names into a mail merge document that is 18
pages
long. I will end up with 18 pages X 1,800 names. Mail merge makes this
one
document. I can't offset each one of the 1,800 on my printer because of
this. Is there something I can do to make this 1,800 seperate print jobs
so
I can offset each set of 18 pages