【求助】Word2007中如果批量取消不连续性文本的超级链接

Sub Clean() For i = 1 To ActiveDocument.Hyperlinks.Count ActiveDocument.Hyperlinks(1).Delete Next End Sub 【 在 hlh (干云豪客) 的大作中提到: 】 : 【求助】Word2007中如果批量取消不连续性文本的超级链接 : 谢谢

这是西语言吗？写在哪 【 在 xiongQQ 的大作中提到: 】 : Sub Clean() : For i = 1 To ActiveDocument.Hyperlinks.Count : ActiveDocument.Hyperlinks(1).Delete : ...................

宏 其实是vb 【 在 hlh (干云豪客) 的大作中提到: 】 : 这是西语言吗？写在哪

宏○丫 (－－〆)～～～ ～～～(〆－－) 步骤：打开Word的菜单 工具->宏->Visual Basic 编辑器，打开Visual Basic 编辑器，在Visual Basic 编辑器中选择菜单“插入->模块”，之后会出现一个模块1的编写窗口，把以下代码粘贴进去： Sub RemoveHyperlinks() For a = 1 To ThisDocument.Hyperlinks.Count ThisDocument.Hyperlinks(1).Delete Next End Sub 保存。之后关闭Visual Basic 编辑器回到Word中，选择word菜单 工具->宏->宏，打开宏对话框，会发现多了一个名字叫RemoveHyperlinks的宏，选中这个宏，点一下“运行”按钮，Wrod文档中所有的超级链接就都删除掉了。 注意：运行过一次以后，如果关闭文档重新打开，有可能会提示宏禁用，这时可将文档关闭，再打开时在提示菜单中选择“启用宏”，就可以了。 【 在 hlh (干云豪客) 的大作中提到: 】 : 这是西语言吗？写在哪

啊， 太professional了。。。 【 在 xiongQQ 的大作中提到: 】 : 宏○丫 : (－－〆)～～～ : ～～～(〆－－) : ...................