word文档中如何批量取消超链接但不改变超链接字体的颜色？？？

显示全部楼层 · 2011-10-22 12:13:11

宏代码如下：Do Until Application.ActiveDocument.Hyperlinks.Count = 0
ss = ActiveDocument.Hyperlinks(1).Range.TextActiveDocument.Hyperlinks(1).Range.SelectSelection.DeleteSelection.Text = ssSelection.Font.Color = wdColorBlue '设置取消超链接后的字体颜色Loop...

千问 · 2011-10-22 12:13:11

如果要实现，估计需要使用VB宏来实现了。解决思路：1、按顺序查找每一个链接 2、取消超连接 3、设置字体颜色 4、查找下一个链接，循环1~3步。...