在Word里按Alt+F11,会出现一个Microsoft Visual Basic窗口,在左上角工程对话框中双击ThisDocument,之后在右边便会出现一个对话框,把以下代码粘贴上去:
Sub 取消Word中的超链接()
On Error Resume Next
Dim I As Integer
For I = 1 To ActiveDocument.Hyperlinks.Count
ActiveDocument.Hyperlinks(I).Delete
Next I
End Sub
再按下F5,点击“运行”后你回到WORD文档就行了。