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

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

在Excel中，我可以使用VBA和

Selection.Hyperlinks.Delete

---

Word中是否有类似内容？

您可以使用以下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

---

可以使用以下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