我正在尝试使用 Publisher 编辑大量 Excel 文件的链接。鉴于微软似乎不允许使用相对链接,我试图在 VBA 中创建类似的东西。我没有在网上找到很多文档,只是对 LinkSources 的一些参考。
有没有可能用VBA改变这些链接?
我假设您知道如何添加对 Excel 对象库的引用。然后阅读链接:
dim xl as New Excel.Application
xl.Visible = True
Dim wb As Workbook
Set wb = xl.Workbooks.Open("C:\path to \Myworkbook.xlsx")
Dim v As Variant
v = wb.LinkSources(xlExcelLinks)
Dim first_link as String
first_link = v(1)
MsgBox "First link is to " & first_link
要更改链接:
Dim new_link as String
new_link = "C:\path to\Alternative link.xlsx"
wb.ChangeLink first_link, new_link
希望你明白这一点。