Getting Rid of All Hyperlinks

If you inherit worksheets from other people, you may find that some worksheets contain many, many hyperlinks. These hyperlinks are often automatically created by Excel as you import or enter information in the worksheet. (I see them appear all the time when I paste information into a worksheet that was copied from a web page somewhere.)

If you want to delete these hyperlinks, you can do so by right-clicking on them and choosing Hyperlink | Remove Hyperlink from the Context menu. Doing this with dozens or hundreds of hyperlinks can quickly consume a huge amount of time. Accomplishing such a task quicker calls for the use of a macro.

The following macro quickly removes all hyperlinks in a worksheet, without affecting anything else it may contain:

Sub KillLinks1()
    Do Until ActiveSheet.Hyperlinks.Count = 0
        ActiveSheet.Hyperlinks(1).Delete
    Loop
End Sub

The macro works by stepping through the Hyperlinks collection and deleting anything that is located there. (The Hyperlinks collection allows access to all of the hyperlinks in a document. Convenient, huh?)

You can, if desired, make the macro even shorter, down to a single line:

Sub KillLinks2()
    ActiveSheet.Hyperlinks.Delete
End Sub

Select the worksheet you want to affect, run one of these macros, and you just saved yourself tons of time!