Hi
I would try this macro to delete any hyperlink
Sub DisplayName()
Dim n As Name
For Each n In ThisWorkbook.Names
With n
If MsgBox("Delete " & .Name & " ? " & vbCrLf & _
"Refers to " & .RefersTo, vbYesNo + vbQuestion) Then .Delete
End If
End Sub
Hi
I would try this macro to delete any hyperlink
Sub DisplayName()
Dim n As Name
For Each n In ThisWorkbook.Names
With n
If MsgBox("Delete " & .Name & " ? " & vbCrLf & _
"Refers to " & .RefersTo, vbYesNo + vbQuestion) Then .Delete
End If
End Sub
There are currently 1 users browsing this thread. (0 members and 1 guests)
Bookmarks