Getting Rid of Many Hyperlinks

Do you create worksheets by pasting information that was copied from the Internet? This is not unusual for some people, as there is quite a bit of public-domain information that can be copied from the Internet. When you paste your information into a worksheet, you may notice that there are quite a few hyperlinks. What if you want to get rid of those hyperlinks? Similarly, you might inherit a worksheet from someone, and it contains a lot of hyperlinks you want deleted.

The easiest approach is to run a macro that deletes all the hyperlinks. The following macro quickly removes all hyperlinks in a document, without affecting anything else in the worksheet:

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