Staple Break

D

dvya

I am printing directly to my copy machine that has a stapling feature. I am
about to print 200 applications and i would like the printer to know that
each one is seperate and to staple each group individually. Any idea how to
set this up.

Thank You,
 
D

Doug Robbins - Word MVP

If you execute the merge to a new document and then run the following macro
when that document is the active document, each letter created by the
mailmerge will be sent 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
 
D

dvya

Thank You, though when running the Macro I am getting an error message the
words"with active document"are highlighted and the message is:
Compile error
Invalid outside procedure

Any ideas of what I a mdoing wrong?

Thank You
 
D

dvya

Now that i got this working is there a way to have it setup so the print
dialog shows up in order that i can choose the correct printer with the
correct settings?
 
D

Doug Robbins - Word MVP

See the article "Changing the selected (current) printer in Word without
changing the system default printer" at:

http://www.word.mvps.org/FAQs/MacrosVBA/ChangeCurPrinter.htm

to get the printer properties set the way that you want them for this
particular exercise, you may want to install a second copy of the printer
and set the properties in the Control Panel Printers dialog.


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

Simon

would it possible to use this macro (or something similar) when printing
reports or forms in MS Access?

Thanks,
Simon
 
D

Doug Robbins - Word MVP

I would be sure that it can be done in Access, but as I don't have a routine
already developed for it, you would be better off asking in one of the
Access newsgroups.

Or, the following page of Bill Gate's look-a-like website at may be a good
starting point:

http://www.members.shaw.ca/AlbertKallal/wordmerge/index.html



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

Nikki Nakki Noo

Hi,

I hope you don't mind me tagging on to this "thread". I have used this
macro in the past, most effectively, however I have come across a problem
which I wondered if you could assist with. For example, if the document
printed is a culmination of letters (sections), that are alphabetical say,
the printer doesn't necessarily print them in the order that they appear in
the Word Document. It seems to print the majority of the document in
page/section order, but throws a percentage in just willy nilly. Is this
something you've come across before? Can this be avoided?

Thank you
Nikki
 
D

Doug Robbins - Word MVP

Try:

Dim i As Long
With ActiveDocument
For i = 1 To .Sections.Count
.PrintOut Background:=False, 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
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top