得用宏。同时按alt和f11,进入宏界面,点菜单的插入,模块,粘贴以下代码:
SUb
test()
For
i
=
1
to
thisdocument.hyperlinks.count
thisdocument.hyperlinks(1).address
=
replace(thisdocument.hyperlinks(1).address,
"123456",
"abcdef")
next
i
end
SUb
直接按f5运行此宏,完成。
可以参考下面方法处理:
1、首先单击“文件”—“选项”;
2、在弹出的“选项”面板上“自定义功能区”面板的右边一栏勾线“开发工具”;
3、单击“开发工具”,在弹出的面板上单击“viSUalbasic”;
4、调出代码窗口,输入批量修改表格代码;
5、单击“开发工具”—“宏”;
6、在弹出的宏命令选择框中选择“批量修改表格”执行“宏命令;
7、然后选中所有表格;
8、单击“设计”,选择合适的效果;
9、最后即可完成。