View Single Post
 
Old 07-17-2018, 12:24 AM
macropod's Avatar
macropod macropod is offline Windows 7 64bit Office 2010 32bit
Administrator
 
Join Date: Dec 2010
Location: Canberra, Australia
Posts: 22,373
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

Well, you did ask about a VB...

Assuming you can do your merge setup so it outputs:
Code:
firstname lastname@companyname.co.uk
you could then do a wildcard Find/Replace, where:
Find = (<[A-Za-z0-9]@>) (<[A-Za-z0-9]@>\@[A-Za-z0-9.]{1,})
Replace = \1.\2
to turn all those strings into:
Code:
firstname.lastname@companyname.co.uk
Even so, you wouldn't have clickable email addresses.
__________________
Cheers,
Paul Edstein
[Fmr MS MVP - Word]
Reply With Quote