Microsoft Office Forums

Go Back   Microsoft Office Forums > >

Reply
 
Thread Tools Display Modes
  #1  
Old 01-30-2017, 08:46 AM
Danholland Danholland is offline Mail Merge Printing Windows 10 Mail Merge Printing Office 2013
Novice
Mail Merge Printing
 
Join Date: Jan 2017
Posts: 2
Danholland is on a distinguished road
Default 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?
Reply With Quote
  #2  
Old 02-02-2017, 09:43 PM
gmayor's Avatar
gmayor gmayor is offline Mail Merge Printing Windows 10 Mail Merge Printing Office 2016
Expert
 
Join Date: Aug 2014
Posts: 4,101
gmayor has much to be proud ofgmayor has much to be proud ofgmayor has much to be proud ofgmayor has much to be proud ofgmayor has much to be proud ofgmayor has much to be proud ofgmayor has much to be proud ofgmayor has much to be proud of
Default

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
Reply With Quote
  #3  
Old 02-03-2017, 01:49 AM
Danholland Danholland is offline Mail Merge Printing Windows 10 Mail Merge Printing Office 2013
Novice
Mail Merge Printing
 
Join Date: Jan 2017
Posts: 2
Danholland is on a distinguished road
Default

will this need changing at all, im not very good at understanding macros


Quote:
Originally Posted by gmayor View Post
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
Reply With Quote
  #4  
Old 02-03-2017, 04:39 AM
gmayor's Avatar
gmayor gmayor is offline Mail Merge Printing Windows 10 Mail Merge Printing Office 2016
Expert
 
Join Date: Aug 2014
Posts: 4,101
gmayor has much to be proud ofgmayor has much to be proud ofgmayor has much to be proud ofgmayor has much to be proud ofgmayor has much to be proud ofgmayor has much to be proud ofgmayor has much to be proud ofgmayor has much to be proud of
Default

http://www.gmayor.com/installing_macro.htm
__________________
Graham Mayor - MS MVP (Word) (2002-2019)
Visit my web site for more programming tips and ready made processes www.gmayor.com
Reply With Quote
  #5  
Old 03-20-2018, 06:39 AM
loriwojo loriwojo is offline Mail Merge Printing Windows 7 64bit Mail Merge Printing Office 2010 64bit
Novice
 
Join Date: Apr 2014
Posts: 1
loriwojo is on a distinguished road
Default Where do I insert the macro?

Never mind - solved

Last edited by loriwojo; 03-20-2018 at 06:56 AM. Reason: Solved
Reply With Quote
Reply

Thread Tools
Display Modes


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

Other Forums: Access Forums

All times are GMT -7. The time now is 02:42 PM.


Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2024, vBulletin Solutions Inc.
Search Engine Optimisation provided by DragonByte SEO (Lite) - vBulletin Mods & Addons Copyright © 2024 DragonByte Technologies Ltd.
MSOfficeForums.com is not affiliated with Microsoft