I think this was caused by use of the 'AutoFormat - None' command whilst the
whole sheet was selected.
Is there a way to return all the links to blue / purple underlined?
TIA
Huw
Sub RestoreHyperlinks()
Dim H As Hyperlink
For Each H In ActiveSheet.Hyperlinks
H.Range.Style = "Hyperlink"
Next
End Sub
Bill Manville
MVP - Microsoft Excel, Oxford, England
No email replies please - respond to newsgroup
"Bill Manville" <Bill-M...@msn.com> wrote in message
news:VA.00000f2...@msn.com...