MS Word - Remove All hyperlinks - VBA

Hello,

I have a word document that has been created by copying and pasting various webpages.  The problem is that it is littered with hyperlinks that are causing problems in another process.  Is there a way to 'remove all hyperlinks' in a Word document.  Currently I can only see this being possible by manually edit each hyperlink and removing or pressing the remove hyperlink button.

If this is not possible with native features, can somone help with some simple VBA that would do this.  I created some VBA in Excel some time ago to do this - but don't have this anymore and also it had a different object model - not done any VBA in MS Word. I'm guessing it should be very simple.

Raheel
hennanra3Asked:
Who is Participating?
 
geneusConnect With a Mentor Commented:
This macro will remove the hyperlinks from all text in the document.
Sub RemoveHyperlinks()
 
Dim y As Long
With ActiveDocument.Hyperlinks
  For y = 1 To .Count
    .Item(1).Delete
  Next y
End With
MsgBox "Completed!"
 
End Sub

Open in new window

0
 
hennanra3Author Commented:
Wow - that was fantastic and too easy!  Many thanks.
0
All Courses

From novice to tech pro — start learning today.