Deleting links in Excel 2000

[billfinn]

I have been working on this spreadsheet for a few months and it is just about ready for prime time. Unfortunately it has decided in the last couple days that it has links and it asks every time I open it about refreshing them. The links are phantom and don't exist anywhere except in the warped mind of my spreadsheet. I want to delete the links but am using Excel 2000 (don't ask) and that is not an option. If I open the file in Excel 2010 using compatibility mode it says there are no links. I tried to connect to 3 or 4 web pages that had options and all of the sebpages are nonexistent. Any thoughts or suggestions would be very much appreciated. I simply cannot copy, paste special values as it would take at least a couple weeks to make things work again. I am assuming that there is a better way to get rid of these phantom links and that someone on here can point me in the better direction.
Thanks much
Bill

 

[Trevor G]

Bill I would consider 2 options. The following VBA code would look to delete all links in a workbook (workbook needs to be open). If you want to check manually you can use the Find Replace option. Ctrl & H search for [ (square bracket), replace all with nothing. Alter the Search for the whole workbook then use replace all.

Sub DeleteLinks1A()
'Remove all links in a workbook
Dim wbK As Workbook
Set wbK = Application.ActiveWorkbook
If Not IsEmpty(wbK.LinkSources(xlExcelLinks)) Then
For Each link In wbK.LinkSources(xlExcelLinks)
wbK.BreakLink link, xlLinkTypeExcelLinks
Next link
End If
End Sub

 

[billfinn]

Trevor,
I tried running this macro with no difference made. I ended up downloading the Find Links add in from Bill Maranville. Worked like a charm.
Thanks,
Bill

 

[Trevor G]

Thanks for letting me know you have found a solution Bill Sorry the code didn't work for you.