Question

我想立刻在excel中更改多个超链接文件的路径。

大部分都是file:///F:\URL PDF\"name of file"

我想将路径更改为file:///C:\USER\Christina\Desktop\PDFs\URL PDF\"name of file"。

请注意，每个文件的每个“文件名”都不同。

Answer 1

这可以通过VBA实现。

每个工作表都有一个超链接集合。每个超链接都有一个名为“地址”的属性。那些地址是字符串。对于字符串，有一个函数Replace（）。此函数可以将一个子字符串替换为另一个子字符串。

ActiveWorkbook中工作表1的示例：

With ActiveWorkbook.Worksheets(1)
 For Each oHyperlink In .Hyperlinks
  MsgBox oHyperlink.Address
  sNewAddress = Replace(Expression:=oHyperlink.Address, Find:="F:\URL PDF\", Replace:="C:\USER\Christina\Desktop\PDFs\URL PDF\")
  oHyperlink.Address = sNewAddress
  MsgBox oHyperlink.Address
 Next
End With

问候

阿克塞尔

如何在excel中更改多个超链接文件的路径？

1 个答案: