Routine #10 from our series of text subroutines to use in EXCEL to remove all hyperlinks from a string. When applied to a range it will remove all hyperlinks from the selected cells content.
Code snippet below:
Sub remove_hyperlinks() 'remove all hyperlinks Dim selected_range As Range Set selected_range = Range(Selection.Address) Dim old_value As String For Each cell In selected_range cell.Hyperlinks.Delete Next End Sub
You can see how to add this to Excel in order to use the code in this thread UPPER CASE