View Single Post
  #8   Report Post  
Posted to microsoft.public.word.mailmerge.fields
Doug Robbins - Word MVP Doug Robbins - Word MVP is offline
external usenet poster
 
Posts: 8,832
Default How to send each document as a separate print job in Word?

The code is telling the computer to print the document 1 section at a time,
not any particular number of pages. Do you have more than one Section in
each letter?

--
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

"Kbrad32 via OfficeKB.com" u47076@uwe wrote in message
news:8c239bc17d31d@uwe...
I tried the the code and it works find but now it will print double sided.
I
have my printing peferences set to duplexe so I wouldn't have to do it
manually. So I'm not sure whats going on there and I tried the
modifications
and it will only print the first four pages no matter what # of page to
print
(ie 51-100)...any suggestions?

Doug Robbins - Word MVP wrote:
Try

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

The computer should not then send the next print job until the present one
is finished.

If you want to modify the macro between each batch, you could replace the
line

For i = 1 To .Sections.Count Step 1

with

For i = 1 to 50

then after the first 50 are printed, change it to

For i = 51 to 100

etc.
I have my printer to print both sides...it's cookbook to be exact and I
don't

[quoted text clipped - 11 lines]
Thanks,
Kbrad32


--
Message posted via OfficeKB.com
http://www.officekb.com/Uwe/Forums.a...merge/200810/1