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

・问题产生的原因

在2000之后的版本中,

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

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

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

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

提示说链接不可用。

 

・解决方法

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

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

比如,

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

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

2.清楚所有的链接

3.清楚所有的数据检证

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

4.删除所有的条件格式

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

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

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

 

・批量处理代码

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

Public Sub clearAll()
    Dim sh As Worksheet
    For Each sh In ActiveWorkbook.Sheets
        '激活当前Sheet页
        sh.Activate
        '把光标放在最前面
        sh.Range("A1").Activate
        '删除所有链接(单元格中定义的超链接)
        sh.Hyperlinks.Delete
        '删除所有条件格式
        sh.Cells.FormatConditions.Delete
    Next
    ActiveWorkbook.Sheets(1).Activate
    
    '其它实现方法
    For i% = 1 To Worksheets.Count
        Sheets(i).Cells.FormatConditions.Delete
    Next
    ActiveWorkbook.Sheets(1).Activate

End Sub

 

・后记

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

评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值