09-06
27

利用宏一次去除WORD中的所有超级链接

按Alt+F11,会出现一个Microsoft Visual Basic窗口,在左上角工程对话框中双击ThisDocument,之后在右边便会出现一个对话框,把以下代码粘贴上去:
=============我是分割线=====================


Sub 取消链接()
For a = 1 To ThisDocument.Hyperlinks.Count
ThisDocument.Hyperlinks(1).Delete
Next
End Sub

=============我是分割线====================

按下F5运行该宏,点击左上角Word按钮回到WORD文档就能看到所有的链接已经取消

注意:看代码可知,宏要建在文档当中才有效(即在ThisDocument之中)



[本日志由 blurxx 于 2009-06-27 10:10 PM 编辑]
文章来自: 本站原创
引用通告: 查看所有引用 | 我要引用此文章
Tags: 超级链接 word ThisDocument
相关日志:
评论: 0 | 引用: 0 | 查看次数: 216
发表评论
昵 称:
密 码: 游客发言不需要密码.
内 容:
验证码: 验证码
选 项:
虽然发表评论不用注册,但是为了保护您的发言权,建议您注册帐号.
字数限制 1000 字 | UBB代码 开启 | [img]标签 关闭