SEOGG’s blog

删除Word中所有超链接的方法如下：打开Word的菜单 工具->宏->Visual Basic 编辑器，或直接按快捷键 Alt+F11，打开Visual Basic 编辑器，在Visual Basic 编辑器中选择菜单 插入->模块，之后会出现一个模块1的编写窗口，把以下代码粘贴进去。

Sub RemoveHyperlinks()
Dim oField As Field
For Each oField In ActiveDocument.Fields
If oField.Type = wdFieldHyperlink Then
oField.Unlink
End If
Next
Set ōField = Nothing
End Sub

之后关闭Visual Basic 编辑器回到Word中，选择word菜单 工具->宏->宏，打开宏对话框，你会发现多了一个名字叫RemoveHyperlinks的宏，选中这个宏，点一下“运行”按钮，Wrod文档中所有的超级链接就都删除掉了。

另外：这个宏我们可能只用一次，若此时保存退出后以后打开这个word文件时会有安全警告，所以如果以后不用了的话我们要把这个宏删除掉。删的方法也很简单，打开Visual Basic 编辑器（Word的菜单 工具->宏->Visual Basic 编辑器）在左边的工程管理器中找到我们刚建立的模块1，在模块1上按鼠标右键，选择移除模块1，就好了。