Merged files not individually collated and stapled when word print

[psy UK]

Merged documents containing several records are not individually collated and
stapled when you use the mail merge feature to print in word, i.e. 1 document
is printed and stapled on the printer. I have seen the knowledge based
article detailing how to do the same thing in Publisher by changing values in
regedit.

Does a similar answer exist in relation to word.

Many thanks

 

[Graham Mayor]

You should be able to do this with one of fellow MVP Doug Robbins handy
merge macros

Sub SplitMergeLetterToPrinter()

' splitter Macro
' Macro created 16-08-98 by Doug Robbins to print each letter created by a
' mailmerge as a separate file.
'

Letters = ActiveDocument.Sections.Count
Counter = 1
While Counter < Letters
ActiveDocument.PrintOut Background:=False, Range:=wdPrintFromTo, _
From:="s" & Format(Counter), To:="s" & Format(Counter)
Counter = Counter + 1
Wend

End Sub


--
<>>< ><<> ><<> <>>< ><<> <>>< <>><<>
Graham Mayor - Word MVP


<>>< ><<> ><<> <>>< ><<> <>>< <>><<>

 

[psy UK]

Excellent - many thanks

You should be able to do this with one of fellow MVP Doug Robbins handy
merge macros

Sub SplitMergeLetterToPrinter()

' splitter Macro
' Macro created 16-08-98 by Doug Robbins to print each letter created by a
' mailmerge as a separate file.
'

Letters = ActiveDocument.Sections.Count
Counter = 1
While Counter < Letters
ActiveDocument.PrintOut Background:=False, Range:=wdPrintFromTo, _
From:="s" & Format(Counter), To:="s" & Format(Counter)
Counter = Counter + 1
Wend

End Sub


--
<>>< ><<> ><<> <>>< ><<> <>>< <>><<>
Graham Mayor - Word MVP


<>>< ><<> ><<> <>>< ><<> <>>< <>><<>

 

[scottagalloway]

You should be able to do this with one of fellow MVP Doug Robbins handy
merge macros

Sub SplitMergeLetterToPrinter()

' splitter Macro
' Macro created 16-08-98 by Doug Robbins to print each letter created by a
' mailmerge as a separate file.
'

Letters = ActiveDocument.Sections.Count
Counter = 1
While Counter < Letters
ActiveDocument.PrintOut Background:=False, Range:=wdPrintFromTo, _
From:="s" & Format(Counter), To:="s" & Format(Counter)
Counter = Counter + 1
Wend

End Sub

--
<>>< ><<> ><<> <>>< ><<> <>>< <>><<>
Graham Mayor - Word MVP

My web sitewww.gmayor.com
Word MVP web sitehttp://word.mvps.org
<>>< ><<> ><<> <>>< ><<> <>>< <>><<>

I would like to use this macro but don't know where to start with
word macros. How do i take the snipit of text above and use it to
create a macro in word. then at what point in the mail merge process
do i run the macro?

Thanks,

Scott

 

[Peter Jamieson]

You could look around Graham Mayor's site a bit more -

http://www.gmayor.com/installing_macro.htm

or see

http://word.mvps.org/FAQs/MacrosVBA/CreateAMacro.htm

then at what point in the mail merge process
do i run the macro?

In this case you probably need to set up the mail merger main document,
connect it to the data source, then run the macro.