如何清除WORD、EXCEL中的所有超链接

如何清除WORD、EXCEL中的所有超链接(超级链接文字不变)

删除Word中所有超链接的方法如下：打开Word的菜单 工具->宏->Visual Basic 编辑器，或直接按快捷键 Alt+F11，打开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文档中所有的超级链接就都删除掉了。
另外：这个宏我们可能只用一次，若此时保存退出后以后打开这个word文件时会有安全警告，所以如果以后不用了的话我们要把这个宏删除掉。删的方法也很简单，打开Visual Basic 编辑器（Word的菜单 工具->宏->Visual Basic 编辑器）在左边的工程管理器中找到我们刚建立的模块1，在模块1上按鼠标右键，选择移除模块1，就好了。
删除Excle工作表中的所有超链接的方法也差不多，也是打开Visual Basic 编辑器，粘贴一段代码，然后运行宏，只是这段代码不同而已。代码如下：

Sub RemoveHyperlinks() 
      ‘Remove all hyperlinks from the active sheet 
       ActiveSheet.Hyperlinks.Delete 
End Sub

下面的代码也可以删除Excle工作表中的所有超链接：

Sub ZapHyperlinks()
    Cells.Hyperlinks.Delete
End Sub

另外，如果讨厌Word和Excel的这个功能，可以直接将其取消word和excel自动加超链接的功能，方法如下：
Wrod和Excel是一样的：菜单 工具->自动更正选项->键入时自动套用格式 选项卡->把 Internet 及网络路径替换为超链接 前的对勾去掉。