乔山办公网我们一直在努力
您的位置:乔山办公网 > excel表格制作 > EXCEL 2007 如何批量修改某一列超链接中的部分字段-excel2007编辑链接,excel批量修改链接

EXCEL 2007 如何批量修改某一列超链接中的部分字段-excel2007编辑链接,excel批量修改链接

作者:乔山办公网日期:

返回目录:excel表格制作


Excel小技巧



最好截图,才能更好更准确把握你的意图,也能更快解决你的问题。
环境:Excel2003,超链接是通过在单元格上右击选择“超链接”而产生的超链接;
注意:这种超链接是无法通过excel的查找功能查找具体的超链接路径的,也就无法用查找替换来批量修改超链接路径了;
下面介绍一种方法:

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

1.如图所示,新建636f7079e79fa5e98193363一个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,重新打开,就不会再弹出提示框了。


相关阅读

关键词不能为空
极力推荐

ppt怎么做_excel表格制作_office365_word文档_365办公网