Try

Dim WS As Worksheet
Set WS = ActiveSheet
WS.Hyperlinks.Delete

This will remove the hyperlink and leave in the cell the current
value of the link.


--
Cordially,
Chip Pearson
Microsoft MVP - Excel
Pearson Software Consulting, LLC
www.cpearson.com




"Don" wrote in message
...
My spreadsheet is riddled with hyperlinks that I cannot see and
are not
associated with my data. The file takes forever to load and is
huge - almost
as if there is another file behind it that I cannot see. I
believe that I
can globably shut-up hyperlink for new entries, but is there a
way to clean
my entire file without losing my data?