Oops, Norman's way is much better - Only one line and poof! They're all gone.

"NateBuckley" wrote:

Sub RemoveHyperLinks()
Dim hlinks As Hyperlinks
Dim hlink As Hyperlink
Set hlinks = Sheet1.Hyperlinks

For Each hlink In hlinks
hlink.Delete
Next hlink

End Sub

There you go :D grab the hyperlinks collection from Sheet1 (change if on
another sheet) and then go through each hyperlink in the collection, deleting
as you go.

Hope this helps! :)

"Graham H" wrote:

I have downloaded a lot of text from a site and most of it is in hyperlinks, but I just
want the text. Is there a quick way to remove all the hyperlinks in a worksheet or
workbook. I appreciate I could loop round all the cells but there is a lot of material and
I just wondered if there was something simpler. I would value any help.

Regards
Graham