excel - 收集 Excel 2010 中链接工作簿的列表/文件夹

Question

我有一个工作簿，它链接到许多其他工作簿，而这些工作簿又链接到其他工作簿。有没有一种简单的方法来收集当前打开的工作簿引用的所有工作簿？我可以想象编写一个宏来查看工作簿中包含公式的所有单元格，检查公式中括号中的任何内容并将它们复制到列表中，但这似乎很笨拙并且希望没有必要。 Excel 是否有任何工具可以帮助跟踪文件链接到的工作簿？我知道“跟踪先例”在工作簿中很有用，并且组合键“ctrl+[”对于跟踪链接数据很有用，但我无法对工作簿中的所有单元格手动执行此操作。感谢您的帮助。

Answer 1

此代码将为您提供与单击“编辑”>“链接”所获得的列表相同的列表。

Sub PrintLinkedBooks()

Dim LinkedBooks As Variant
Dim i As Long

LinkedBooks = ThisWorkbook.LinkSources()
For i = LBound(LinkedBooks) To UBound(LinkedBooks)
    Debug.Print LinkedBooks(i)
Next i

End Sub

还有一些工具可以查找链接。我从未使用过 and but Bill Manville's是推荐的一个。