Finding a URL in a body of text

Topic

New Reply

Using VBA trying to find text that is also a URL wiithin a body of text. I assume the URl is astyle or something like a style that could be searched for but haven’t dscovered the method or property, anyone know what to use?

Thank you

Reply | Quote

Replies

Try searching the VBA help for “hyperlink” to give yourself a start. HTH

Reply | Quote

Using VBA trying to find text that is also a URL wiithin a body of text. I assume the URl is astyle or something like a style that could be searched for but haven’t dscovered the method or property, anyone know what to use?

Thank you

Hi Jim,

Try something along the lines of:

Code:

Sub Find_URLs()
' Macro by macropod
With Selection.Find
  .ClearFormatting
  .Replacement.ClearFormatting
  .Text = "htt[ps]{1,2}:^47^47[^32-^127]{3,}"
  .Replacement.Text = ""
  .Forward = True
  .Wrap = wdFindContinue
  .Format = False
  .MatchCase = False
  .MatchWholeWord = False
  .MatchAllWordForms = False
  .MatchSoundsLike = False
  .MatchWildcards = True
  .Execute
End With
End Sub

Cheers,
Paul Edstein
[Fmr MS MVP - Word]

Reply | Quote

Thank you both for the help!

Reply | Quote