12-23-2019, 12:40 PM
|
|
Administrator
|
|
Join Date: Dec 2010
Location: Canberra, Australia
Posts: 21,963
|
|
Quote:
Originally Posted by noslenwerd
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]
|