打开excel后,提示更新链接的原因(含批量处理VBA代码)

・问题产生的原因

在2000之后的版本中,

当我们打开,低于当前版本的excel文件时,

会对整个excel进行重新计算,

重新计算时,会强制更新所有外部引用,

这时,如果外部链接源不可用,便会返回#REF!错误,

提示说链接不可用。

・解决方法

【数据】→ 【编辑链接】中, 解除链接即可

但是有的时候我们无法接触链接

比如,

今天我遇到了这样的问题后,进行了如下操作

1.删除所有excel中定义的变量

2.清楚所有的链接

3.清楚所有的数据检证

做完以上还是没有效果,进行如下操作后,才把链接删除掉

4.删除所有的条件格式

(我一个一个删除的,只保留1个sheet页,

一个单元格中有数据,删除这个单元格的条件格式后,

重新打开excel,链接对应的提示,也跟着消失了,即下图中的【编辑链接】变为灰色不可选)

・批量处理代码

使用前请理解代码含义并做好备份

  1. Public Sub clearAll()
  2. Dim sh As Worksheet
  3. For Each sh In ActiveWorkbook.Sheets
  4. '激活当前Sheet页
  5. sh.Activate
  6. '把光标放在最前面
  7. sh.Range('A1').Activate
  8. '删除所有链接(单元格中定义的超链接)
  9. sh.Hyperlinks.Delete
  10. '删除所有条件格式
  11. sh.Cells.FormatConditions.Delete
  12. Next
  13. ActiveWorkbook.Sheets(1).Activate
  14. '其它实现方法
  15. For i% = 1 To Worksheets.Count
  16. Sheets(i).Cells.FormatConditions.Delete
  17. Next
  18. ActiveWorkbook.Sheets(1).Activate
  19. End Sub

・后记

至于,这个链接为什么会藏在条件格式中,原因不明

(0)

相关推荐