View Single Post
 
Old 05-16-2019, 09:48 PM
macropod's Avatar
macropod macropod is offline Windows 7 64bit Office 2010 32bit
Administrator
 
Join Date: Dec 2010
Location: Canberra, Australia
Posts: 21,962
macropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond repute
Default

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
Clicking on the 'Edit Individual Documents' button will intercept the merge, finishing it and re-arranging the output.
__________________
Cheers,
Paul Edstein
[Fmr MS MVP - Word]
Reply With Quote