#1
|
|||
|
|||
Mail Merge Printing
Hi
i have a mail merge for printing form packs which are all 6 pages each, what i would like to be able to do it print each set so that every 6 pages would staple so that once the jobs finished ill have individual forms ready to be posted. does anyone know a way around this without printing each set individually? |
#2
|
||||
|
||||
If your data source is Excel, you could use http://www.gmayor.com/ManyToOne.htm in One to One mode and merge to the printer, each document is treated as a separate print job.
If not you could use the following macro. Merge to a new document and use the macro to split the document to the printer. Code:
Sub SplitMergeLetterToPrinter() Dim lng_Sections As Long Dim lng_Counter As Long lng_Sections = ActiveDocument.Sections.Count lng_Counter = 1 While lng_Counter < lng_Sections ActiveDocument.PrintOut Background:=False, Range:=wdPrintFromTo, _ From:="s" & Format(lng_Counter), to:="s" & Format(lng_Counter) lng_Counter = lng_Counter + 1 Wend lbl_Exit: Exit Sub End Sub
__________________
Graham Mayor - MS MVP (Word) (2002-2019) Visit my web site for more programming tips and ready made processes www.gmayor.com |
#3
|
|||
|
|||
will this need changing at all, im not very good at understanding macros
Quote:
|
#4
|
||||
|
||||
__________________
Graham Mayor - MS MVP (Word) (2002-2019) Visit my web site for more programming tips and ready made processes www.gmayor.com |
#5
|
|||
|
|||
Where do I insert the macro?
Never mind - solved
Last edited by loriwojo; 03-20-2018 at 06:56 AM. Reason: Solved |
|
Similar Threads | ||||
Thread | Thread Starter | Forum | Replies | Last Post |
Printing a Mail Merge output file | Ar-Pharazon | Mail Merge | 7 | 09-13-2014 07:11 AM |
problem printing labels using mail merge | renee.g | Mail Merge | 1 | 05-08-2013 01:33 AM |
Help With Printing Mail Merge | dazwm | Mail Merge | 6 | 04-19-2013 05:15 PM |
Mail Merge Skipping 2 Labels when Printing | mbsfirst | Mail Merge | 3 | 12-27-2010 04:28 PM |
Printing problem with mail merge | irenej48 | Mail Merge | 0 | 01-01-2010 03:03 PM |