如何批量修改excel中的超链接

发布网友发布时间：2022-04-22 06:22

共5个回答

热心网友时间：2024-09-04 12:34

环境：Excel2003，超链接是通过在单元格上右击选择“超链接”而产生的超链接；
注意：这种超链接是无法通过excel的查找功能查找具体的超链接路径的，也就无法用查找替换来批量修改超链接路径了；
下面介绍一种方法：

点击菜单，工具→宏→Microsoft 脚本编辑器，是不是发现从这里可以看到超链接的具体路径呢！
现在好办事了，用查找替换的方法快速修改超链接路径，修改完后，点击菜单，文件→将所选项目存为...→保存为一个html文件，完成后，再用excel打开该html文件，最后重新保存该文件为"microsoft office excel工作簿"文件。

这样就OK了！

也许你会问，为什么不在"Microsoft 脚本编辑器"中直接保存，这个你自己实践一下就知道了

热心网友时间：2024-09-04 12:39

1.如图所示，新建一个Excel，输入数据；

↓

2.选择“插入”选项卡，点击“链接”选项的“超链接”插入链接文档。

3.当仅移动文件或是插入文档的位置时，会弹出“无法打开指定的文件”的提示框，这时就需要修改链接地址。

4.选择“开发工具”选项卡，点击“代码”选项的“宏安全性”；

↓

5.弹出“信任中心”窗口；

↓

6.在“信任中心”窗口中，选择“宏设置”选项卡→点击“宏设置”选项中的“启用所有宏”单选项→点击“确定”。

7.回到Excel中，选择“开发工具”选项卡，点击“控件”选项的“查看代码”；

↓

8.弹出Excel的VB窗口“Microsoft Visual Basic - 新建 Microsoft Office Excel 工作表”；

↓

9.在VB窗口中，选择需修改超链接的Sheet页；

↓

10.在Sheet1（代码）窗口中，输入下列代码：

Sub ChangeHyperlink()

For Each c In ActiveSheet.Hyperlinks

c.Address = Replace(c.Address, "新建文件夹\", "F:\ZHOUMIN\操作文档\Excel\新建文件夹\")

End Sub

说明：如图所示，代码中，第一个引号的内容为超链接的原始路径，第二个引号的内容为现在的路径。

↓

关闭VB窗口。

11.回到Excel中，选择“开发工具”选项卡，点击“代码”选项的“宏”；

↓

12.弹出“宏”设置窗口；

↓

13.在宏名中输入“Sheet名.方法名”，如“Sheet1.ChangeHyperlink”；

↓

14.点击“执行”。

15.关闭“宏”设置窗口，回到Excel中，随意打开一个超链接，能成功打开链接文档，则超链接修改成功。

16.因为设置了宏，所有在保存或关闭Excel的时候，会弹出隐私问题警告提示框，如图所示；

↓

17.为了让提示框不在弹出，可以进入“开发工具”选项卡，点击“代码”选项的“宏”，选中宏名，点击删除即可。

↓

18.关闭Excel，重新打开，就不会再弹出提示框了。

热心网友时间：2024-09-04 12:32

直接查找替换不能批量修改，我试过，我也在找答案呢，我看有些人用 HYPERLINK 函数，你也试试看。

热心网友时间：2024-09-04 12:36

没错，替换很简单，
将法律替换为档案馆\法律即可，需要注意的是确保其他地方没有法律关键字