![]() |
#3
|
||||
|
||||
![]()
You could simply add the following macro to the mailmerge main document that's supposed to output the second version:
Code:
Sub MailMergeToDoc() Application.ScreenUpdating = False Dim Tbl As Table ActiveDocument.MailMerge.Execute For Each Tbl In ActiveDocument.Tables With Tbl .Columns(2).Select Selection.Copy .Columns(1).Select Selection.Paste .Columns(3).Delete End With Next Application.ScreenUpdating = True End Sub
__________________
Cheers, Paul Edstein [Fmr MS MVP - Word] |
Tags |
name card |
|
![]() |
||||
Thread | Thread Starter | Forum | Replies | Last Post |
![]() |
B-Man | Mail Merge | 5 | 05-19-2019 07:25 AM |
![]() |
Melissa Camp | Word VBA | 4 | 05-16-2019 09:14 PM |
![]() |
paik1002 | Word | 2 | 12-15-2015 10:11 PM |
2010 Mail Merge Directory how to print back-to-back w/2 pages per sheet | captaintms | Mail Merge | 4 | 08-13-2015 06:21 AM |
![]() |
GrahamV2 | Word | 2 | 06-26-2013 10:38 AM |