View Single Post
 
Old 12-23-2019, 12:40 PM
macropod's Avatar
macropod macropod is offline Windows 7 64bit Office 2010 32bit
Administrator
 
Join Date: Dec 2010
Location: Canberra, Australia
Posts: 21,963
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

Quote:
Originally Posted by noslenwerd View Post
It seems that code isn't able to handle the quotation marks around the link.Would it be possible for me to modify the code so it can handle the quotation marks?
The code does handle quotes, but expects them to be straight quotes, not smart quotes. Smart quotes are not valid in such strings anyway. Still, if that's what you've got, you could change:
Quote:
StrAddr = Replace(Split(Split(.Text, ">")(0), "=")(1), Chr(34), "")
to:
Quote:
StrAddr = Replace(Replace(Replace(Split(Split(.Text, ">")(0), "=")(1), Chr(34), ""), Chr(147), ""), Chr(148), "")
__________________
Cheers,
Paul Edstein
[Fmr MS MVP - Word]
Reply With Quote