If you change:
Code:
Sub MakeLinks()
Application.ScreenUpdating = False
to:
Code:
Sub MailMergeToDoc()
Application.ScreenUpdating = False
ActiveDocument.MailMerge.Destination = wdSendToNewDocument
ActiveDocument.MailMerge.Execute
the macro will simply intercept the 'Finish & Merge>Edit Individual Documents' command to execute the merge then activate the links. From an end-user perspective, the process is entirely automatic.
There is another way, too, but it takes a fair bit of work to implement. Once it's set up though, no further user interaction is required. It also has the advantage of allowing you to have a display text that differs from the URL/Email address. See the
Mailmerge Hyperlink ‘Click Here’ Insertion topic in the
Mailmerge Tips & Tricks thread:
https://www.msofficeforums.com/mail-...ps-tricks.html