View Single Post
  #7   Report Post  
Posted to microsoft.public.word.mailmerge.fields
Kbrad32 via OfficeKB.com Kbrad32 via OfficeKB.com is offline
external usenet poster
 
Posts: 14
Default How to send each document as a separate print job in Word?

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