Mail merged printing and duplexing

[mrodriguez79]

Here's what I'm trying to do. I need to print out 50 reports that will be on
11"x17" paper and my duplexer will staple and fold them automatically.

Here's the problem: when I mail merged the reports to personalize them and
then sent them to the printer, it seems like it is sending all of the reports
together as one big file instead of 50 individual files. So my
printer/duplexer is trying to make one big report instead of 50 smaller ones,
which obviously will not work.

I think there has to be some type of setting that would take care of this,
but I can't seem to figure it out. Please help!

Thanks,

Mario

 

[Doug Robbins - Word MVP]

You will need to execute the mailmerge to a new document and then use the
following macro to send that document to the printer:

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

 

[mrodriguez79 via OfficeKB.com]

Thanks, Doug. Will try it out!

You will need to execute the mailmerge to a new document and then use the
following macro to send that document to the printer:

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

Here's what I'm trying to do. I need to print out 50 reports that will be
on

[quoted text clipped - 15 lines]

Mario

 

[mrodriguez79 via OfficeKB.com]

Doug, I'm a complete newbie in dealing with macros... so this is going to
sound crazy...

How do I create and execute a macro?

You will need to execute the mailmerge to a new document and then use the
following macro to send that document to the printer:

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

Here's what I'm trying to do. I need to print out 50 reports that will be
on

[quoted text clipped - 15 lines]

Mario

 

[Doug Robbins - Word MVP]

See the article "What do I do with macros sent to me by other newsgroup
readers to help me out?" at:

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


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

Doug, I'm a complete newbie in dealing with macros... so this is going to
sound crazy...

How do I create and execute a macro?

You will need to execute the mailmerge to a new document and then use the
following macro to send that document to the printer:

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

Here's what I'm trying to do. I need to print out 50 reports that will
be
on

[quoted text clipped - 15 lines]

Mario

 

[mrodriguez79 via OfficeKB.com]

Thanks for your time and help, Doug! I really appreciate it!

Mario

See the article "What do I do with macros sent to me by other newsgroup
readers to help me out?" at:

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

Doug, I'm a complete newbie in dealing with macros... so this is going to
sound crazy...

[quoted text clipped - 18 lines]