EXCEL2007如何批量修改超链接
发布网友
共7个回答
热心网友
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\新建文件夹\")
Next
End Sub
说明：如图所示，代码中，第一个引号的内容为超链接的原始路径，第二个引号的内容为现在的路径。
↓
关闭VB窗口。
11.回到Excel中，选择“开发工具”选项卡，点击“代码”选项的“宏”；
↓
12.弹出“宏”设置窗口；
↓
13.在宏名中输入“Sheet名.方法名”，如“Sheet1.ChangeHyperlink”；
↓
14.点击“执行”。
15.关闭“宏”设置窗口，回到Excel中，随意打开一个超链接，能成功打开链接文档，则超链接修改成功。
16.因为设置了宏，所有在保存或关闭Excel的时候，会弹出隐私问题警告提示框，如图所示；
↓
17.为了让提示框不在弹出，可以进入“开发工具”选项卡，点击“代码”选项的“宏”，选中宏名，点击删除即可。
↓
18.关闭Excel，重新打开，就不会再弹出提示框了。
热心网友
前面的确可行，到第4步就不行了。4、替换成功后，只能把名字改回htm格式，然后复制超链接部分回原表格粘帖才行呢。这是我自己试出来的。而且一个表格如果有多个工作表，另存整个工作簿也不行，不过这个就不知道是不是我技术问题了。
热心网友
1. 用Excel打开文件，另存为web 文件（htm）。
2. 用wordpad打开所附目录下的sheet001.html文件，全部替换操作；再打开sheet002.html操作；几个worksheet会有几个sheet，最后保存退出。
3.用Excel打开web文件，另存为xls文件。
我是在2003下操作的
热心网友
用hyperlink()函数可以批量的添加超级链接。应该能够满足你的需求。
我这有个做好的表，你可以参考下
http://club.excelhome.net/attachment.php?aid=535057&k=b027e9b8ef6b3bd1ad0bbf9a1e7544&t=1259804969
热心网友
我前段时间也遇到此问题，我是这样做的：
1、把此文件另存为网页档的htm.
2、然后改扩展名为txt。
3、可以直接替换txt了。
4、替换成功后，把名字改回为xls就行了。
希望此回答能给你能让你满意。
热心网友
我遇到同样问题，留个记号方便以后学习下。
紫色鱼鱼 朋友的回答可能有用，但是无法打开链接，也就无法知道究竟是什么方法了，很遗憾。
热心网友
用“替换”来实现。
CTRL+F，查找E:\work\,替换为D:\study\
