如何使用宏从 Word 文档中删除所有超链接？

Question

如何使用 VBA 宏从 Word 文档中删除所有超链接？

在 Excel 中，我可以使用 VBA 选择所有内容并使用

Selection.Hyperlinks.Delete

Word中有类似的东西吗？

Answer 1

您可以使用以下 VBA 宏从 Word 文档中删除所有超链接。

Sub ClearHyperlinks()

Dim oField As Field

For Each oField In ActiveDocument.Fields
If oField.Type = wdFieldHyperlink Then
oField.Unlink
End If
Next

Set oField = Nothing

End Sub