Sending Merged Documents to Printer Individually

Thread view:

Enable EMail Alerts

Start New Thread

Thread rating:

user@domain.invalid - 17 Dec 2004 16:11 GMT

I need to print a high volume (1000) of high quality 4-page brochures
that need to be stapled. After being merged, the printer can not handle
the extremely large size of file. The printer/copier support indicated
I need to insert a macro, code or VBA macro that will send the merged
documents to the printer individually. The alternative is printing each
one manually (ugh!)

Does anyone know of a code or macro to use for this? Any suggestions?

Crys

Reply to this Message

Doug Robbins - Word MVP - 19 Dec 2004 10:50 GMT

Use the following:

' Throw away Macro created by Doug Robbins
'
Dim i As Long
For i = 1 To ActiveDocument.Sections.Count
ActiveDocument.PrintOut Range:=wdPrintFromTo, From:="s" & i, To:="s" & i
Next

Signature

Please post any further questions or followup to the newsgroups for the
benefit of others who may be interested. Unsolicited questions forwarded
directly to me will only be answered on a paid consulting basis.

Hope this helps
Doug Robbins - Word MVP

> I need to print a high volume (1000) of high quality 4-page brochures
> that need to be stapled. After being merged, the printer can not handle
[quoted text clipped - 6 lines]
>
> Crys

Reply to this Message