Home | Contact Us | FAQ | Search & Site Map | Link to Us
Sign In | Join | Other 45 Sites in Network
Home
DiscussionsAccessExcelInfoPathOutlookPowerPointPublisherWord
DirectoryUser Groups
Related Topics
Outlook ExpressInternet ExplorerWindowsMS Server ProductsMore Topics ...

MS Office Forum / Word / Mailmerge and Fax / June 2005

Tip: Looking for answers? Try searching our database.

Mailmerge with different page requirements

Thread view: 
Enable EMail Alerts  Start New Thread
Thread rating: 
craig friend - 14 Jun 2005 19:52 GMT
I am merging data from an excel document with forms created within Word.
When I attempt to output this to a new document or directly to the printer I
receive the same results.  The desired result is to have each record(set of 5
pages) print with a separate cover and end sheet.  I know that I can set my
printer up with different paper in separate trays but the program(Word)
doesn't seem to differentiate a new cover for each document.  It prints the
very first page(of 45 for example) with the proper cover and the last page(of
45 for example)with the proper end sheet.  This occurs if I merge to a
document or to print.  If anyone has any suggestions on how to repeat a 5
page document over and over with a different cover and end sheet in a
automated way, I would appreciate it.
Doug Robbins - 15 Jun 2005 00:15 GMT
If you execute the merge to a new document and with that document active,
you run a macro containing the following code, it will print the "document"
for each record as a separate print job.

Signature

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

>I am merging data from an excel document with forms created within Word.
> When I attempt to output this to a new document or directly to the printer
[quoted text clipped - 12 lines]
> page document over and over with a different cover and end sheet in a
> automated way, I would appreciate it.
craig friend - 16 Jun 2005 13:54 GMT
Doug...the text was clipped and no longer contains the macro...is there any
way I can contact you to get that macro

Thanks
Doug Robbins - 16 Jun 2005 14:41 GMT
Here it is:

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

Signature

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...the text was clipped and no longer contains the macro...is there
> any
> way I can contact you to get that macro
>
> Thanks
craig friend - 16 Jun 2005 21:06 GMT
Doug,

They keep clipping the info.  I managed to get the first three lines and part
of the 4th.

If there is somewhere that you can point me to that might have this
information available, I would appreciate it!!
craig friend - 17 Jun 2005 14:04 GMT
Doug...

I used the code that was present and it worked fine.  I just assumed, because
the thread stated it had data stripped, that it wasn't complete.

Thanks again for all your help!
 
Sign In
Join
My Latest Posts
My Monitored Threads
My Blog
My Photo Gallery
My Profile
My Homepage

Start New Thread
Enable EMail Alerts
Rate this Thread



©2008 Advenet LLC   Privacy Policy - Terms of Use
This website includes both content owned or controlled by Advenet as well as content owned or controlled by third parties.