Remove All Hyperlinks in Word or Excel

Posted April 3, 2006 by katy8439 in Microsoft Office

These two nifty macros enable you to delete the embedded hyperlinks that are generated when typing URLS or copying information from the web.


Have you ever copied and pasted something from the Internet and then into Word only to get the hyperlinks embedded? You can removed them easily with the Macros below.

Word

Hit [ALT]+[F11] to open the Visual Basic Editor.

Go to Insert > Module, and in the pop-up window copy the following:

Sub RemoveHyperlinks()
Dim oField As Field
For Each oField In ActiveDocument.Fields
If oField.Type = wdFieldHyperlink Then
oField.Unlink
End If
Next
Set oField = Nothing
End Sub

Then click File > Close and return to Microsoft Word.

You can now run the Macro in Word by going to Tools > Macro > Macro and then running RemoveHyperlinks.

Excel:

You can do the same in an Excel Document:

Hit [ALT]+[F11] to open the Visual Basic Editor.

Go to Insert > Module and in the pop-up window copy:

Sub RemoveHyperlinks()
'Remove all hyperlinks from the active sheet
ActiveSheet.Hyperlinks.Delete
End Sub

Then click File > Close, and return to Microsoft Excel

You can now run the Macro in Excel by going to Tools > Macro > Macro and then running RemoveHyperlinks. This will delete all URLS on the selected worksheet.

The Conversation

Follow the reactions below and share your own thoughts.