应用场景:使用 Excel 处理数据,经常会在单元格中使用公式引用多个工作簿之间的数据,工作簿以及被引用数据的工作簿关闭后,再打开工作簿的时候,会出现如下提示:

【Excel】断开外部链接 - 图1

如果点击更新,但是被引用的工作簿文件名称修改了,或者存放路径修改了,将无法正常更新:

【Excel】断开外部链接 - 图2

【Excel】断开外部链接 - 图3

作为使用者肯定不希望有这种提示,于是很多人应该会想到干脆把公式数值粘贴掉,避免出现这个提示。

方法一:复制粘贴为数值(最笨的)

于是找到那些使用公式的单元格,不停的复制 - 选择性粘贴 - 数值……
如果公式太多,而且不在同一个区域的话,操作起来就会比较麻烦,其实 Excel 里已经做好了这种功能:

【Excel】断开外部链接 - 图4

方法二:点击链接选择断开(有点聪明)

点击图中的断开链接,即可达到目的,不过这种链接必须一个一个的去点,如果公式引用了太多外部数据,这样也是不大方便的,Excel 菜单能达到的功能,VBA 基本也都可以做到,对于经常会碰到这种情况需要做这个操作的,创建自定义加载宏按钮来使用还是比较方便的:

【Excel】断开外部链接 - 图5

方法三:VBA(高级玩家)

  1. <button id\="rbbtnBreakLink" label\="断开外部链接" size\="large" onAction\="rbbtnBreakLink" imageMso\="SourceControlShareObjects"/\>
  1. Sub rbbtnBreakLink(control As IRibbonControl)
  2. Call MRange.BreakLink
  3. End Sub
  1. Sub BreakLink() '断开外部链接
  2. Dim arr, i As Integer
  3. arr \= ActiveWorkbook.LinkSources(xlExcelLinks) '返回工作簿中链接的数组
  4. '如果工作簿中无链接,则返回 Empty。
  5. If VBA.IsEmpty(arr) Then
  6. Exit Sub
  7. End If
  8. For i \= 1 To UBound(arr)
  9. ActiveWorkbook.BreakLink Name:\=VBA.CStr(arr(i)), Type:\=xlExcelLinks
  10. Next
  11. End Sub