splitting merge into separate jobs

[Jigsatics]

Hi!

I have set up a mail merge document that reads 2700 records. I tested
the merge to print option by creating a query with only 7 records. I
found out that when I did this it only creates a single print job with
all the records included. Since it's only treated as one print job, the
printer will not distinguish the records, therefore creating a large
pile of printout that needs to be resorted at the end of the job. I
want to treat every record as one print job, because I want the printer
to staple every record together and also to differentiate the top and
bottom page of every record.

How can I do this?

 

[Doug Robbins - Word MVP]

Hi Jigsatics,

Use the following macro

Dim i as Integer
For i = 1 to ActiveDocument.Sections.Count
ActiveDocument.PrintOut Range:=wdPrintFromTo, From:="s" & i, To:="s" & i
Next i

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
*If you're seeing this through Irubin's crappy web site, you should know
that he does not have my permission to include this message on his website.
I own the copyright, and I grant a license to Microsoft, Google and the
usenet community. I deny Irubin the right to repost my message on his site.*

 

[Jigsatics]

Thanks for the reply.

Forgive me for not knowing enough about mail merge but how do you set
up this macro? I have created macros before but not for a mail merge
document. Is it set up the same way? The way I did this was I created a
Sub and then copy and paste your macro inside the sub and then execute
the macro on the mail merge document. Is this correct? I tried this and
it gave me this window that indicates it's printing something but
nothing came out of the printer.

 

[Doug Robbins - Word MVP]

Hi Jigsatics,

First execute the merge to a new document, then with that document as the
activedocument, execute the macro.

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
*If you're seeing this through Irubin's crappy web site, you should know
that he does not have my permission to include this message on his website.
I own the copyright, and I grant a license to Microsoft, Google and the
usenet community. I deny Irubin the right to repost my message on his site.*

 

[Jigsatics]

Thanks! It worked