Searching for a url and replace it with some text using Macro

What problem are you having?

Do Ctrl+H and put the URL in the Find box, and the new text in the Replace box.

Find: https://www.experts-exchange.com/questions/25498725/Searching-for-a-url-and-replace-it-with-some-text-using-Macro.html?cid=1763

Replace: Some text

Then click Replace or Replace All

Hi Graham,
I want to do it through macro. It should be an automated task when the word document loads up.

Thanks,
Mubashir.

This needs to go in the ThisDocument module of the document's template.

Private Sub Document_Open()
    With ActiveDocument.Range.Find
        .Text = "http://www.experts-exchange.com/Software/Office_Productivity/Office_Suites/MS_Office/Word/Q_25498725.html?cid=1763"
        .Replacement.Text = "Some text"
        .Execute Replace:=wdReplaceAll
    End With
End Sub

Select allOpen in new window

Thanks Graham. But i want a regular expression that can search the text for any URL and then replace it.

Thanks,
Mobi.

Hi Graham,
They are simple text like www.somedomain.com, and not hyperlinks in word document, i would like to use a regular expression that parses the whole text of the document and then just replaces the url with some other text.

Thanks,
Mobi.