excel - 以编程方式更改工作簿中的链接

Question

全部，

我有以下代码来更改工作簿的链接。

ThisWorkbook.ChangeLink“OldPath.xlsx”、“NewPath.xlsx”、xlLinkTypeExcelLinks

我的问题是“NewPath.xlsx”代表的工作簿的工作表对象名称与 OldPath.xlsx 中的名称略有不同。那么，是否有一种方法不仅可以通过编程方式更改与 Excel 工作簿关联的路径，还可以更改实际的对象/范围引用或相关的外部链接？

提前致谢。

Answer 1

我唯一的想法是 @d-stroyer 解决方案的扩展版本。您需要替换部分公式，包括文档路径(或者简单地替换工作簿引用，如果已打开):

Cells.Replace What:="C:\Users\Name\Desktop\[OldPath.xlsx]OldSheetName", _
    Replacement:="C:\Users\Name\Desktop\[NewPath.xlsx]NewSheetName", LookAt:=xlPart, _
    SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
    ReplaceFormat:=False

不幸的是，如果您想替换其他 Excel 元素中的链接，例如:一系列图表、可能是数据透视表的数据源等，则这将不起作用(我认为未经过测试)。