如何一次性移除 Word 文档中的所有超链接？

其实，删除 Word 文档中的所有超链接并不复杂。针对 Microsoft Word 用户，本教程将为您介绍几种实用的批量删除超链接的方法。

---

使用移除超链接功能逐个移除超链接

本方法将为您详细介绍如何利用 Word 的“移除超链接”功能，逐一删除文档中的链接。

1. 右键点击需要移除超链接的特定链接文本，在右键菜单中选择移除超链接即可。
2. 重复此操作，即可逐一移除其他超链接。

使用快捷键批量移除当前文档中的所有超链接

许多人喜欢使用快捷键，因为操作简便且能节省时间。无论文档长度如何，都可通过快捷键快速移除所有超链接。

1. 按下 Ctrl + A，即可全选整个文档。
2. 按下 Ctrl + Shift + F9，即可一键移除当前文档中的所有超链接。

---

使用 Kutools for Word 一键移除全部超链接

Kutools for Word 的移除超链接工具，可快速高效地移除文档中的所有超链接，同时保留文本和格式。此外，还可选择移除脚注和尾注中的超链接，是 Word 链接管理的全面解决方案。

1. 移除超链接的方法如下：
   • 针对整个文档：请单击 Kutools > 移除 > 移除超链接。
   • 如需针对特定部分操作，请先选择该部分，然后点击 Kutools> 移除> 移除超链接。

   

2. 在弹出的移除对话框中，点击确定按钮。
3. 会弹出一个对话框，显示已成功移除的超链接数量。关闭该对话框后，您将看到当前文档中的所有超链接均已被清除，效果如下图所示：

   

   

Kutools for Word 的移除超链接工具可帮助您快速移除正文、脚注和尾注中的所有超链接，同时保留文本和格式。马上免费试用！

---

使用 VBA 批量移除当前文档中所有超链接

使用 VBA，您可以轻松删除当前 Word 文档中的全部超链接。操作步骤如下：

1. 按下 Alt + F11，即可打开 Microsoft Visual Basic for Applications 窗口。
2. 点击插入> 模块，然后将下方 VBA 代码复制并粘贴到模块窗口中。

   Sub KillTheHyperlinks()
   ' -----------------------------------------------
   ' Removes all hyperlinks from the document:
   ' Text to display is left intact
   ' -----------------------------------------------
   With ThisDocument
   ' Loop while there are hyperlinks afoot!
   While .Hyperlinks.Count > 0
   .Hyperlinks(1).Delete
   Wend
   End With
   ' Shut this off, don't need anymore popping up
   Application.Options.AutoFormatAsYouTypeReplaceHyperlinks = False
   End Sub

3. 点击运行按钮，或按下 F5，即可执行脚本。

当前 Word 文档中的所有超链接将被一键批量移除，瞬间还原纯净文档。

---

使用 VBA 删除所有已打开 Word 文档中的全部超链接

与第一个 VBA 代码只删除当前文档中的超链接不同，下述 VBA 可帮您一键移除所有打开的 Word 文档中的全部超链接。请按下述步骤操作：

1. 按下 Alt + F11，即可打开 Microsoft Visual Basic for Applications 窗口。
2. 点击插入> 模块，然后将下方 VBA 代码复制并粘贴至模块窗口。

   Sub KillTheHyperlinksInAllOpenDocuments()
   ' -----------------------------------------------
   ' Removes all hyperlinks from any open documents
   ' Text to display is left intact
   ' -----------------------------------------------
   Dim doc As Document
   Dim szOpenDocName As String
   
   ' Loop through all open documents:
   For Each doc In Application.Documents
       ' Store the document name
       szOpenDocName = doc.Name
       ' Remove the hyperlinks from that document
       With Documents(szOpenDocName)
           ' Loop while there are hyperlinks afoot!
           While .Hyperlinks.Count > 0
               .Hyperlinks(1).Delete
           Wend
       End With
   Next doc
   
   Application.Options.AutoFormatAsYouTypeReplaceHyperlinks = False
   End Sub

3. 点击运行按钮，或按下 F5，即可运行 VBA。

运行此代码后，所有打开的 Word 文档中的超链接将被同时删除。

---

阻止 Word 自动为文本添加超链接

例如，如果您移除了“https://www.extendoffice.com”等文本超链接，在输入空格或按下 Enter 键后，超链接可能会再次出现，如下图所示。若要防止自动为文本添加超链接，需在 Word 选项中进行设置。

1. 在 Word 中，点击文件 > 选项，即可进入 Word 选项。
2. 在 Word 选项对话框中，点击左侧菜单中的校对，然后点击自动更正选项按钮。

   

3. 在自动更正对话框中，切换至输入时自动套用格式选项卡，取消勾选用超链接替换互联网和网络路径选项，然后点击确定按钮即可。

   

4. 在 Word 选项对话框中，点击确定按钮即可。

从现在起，Word 将不会再自动为类似网址路径的文本添加超链接。

---