Word VBA脚本以查找超链接文本

如何在word文档中查找链接的文本

例如，“简介”一词有一个超链接

---

我想知道“简介”这个词。

要找到它们，请使用以下子项：

Sub qSolution()

    Dim HL As Hyperlink
    For Each HL In ActiveDocument.Hyperlinks
        Debug.Print HL.Range.Text
    Next
End Sub

要查找您知道的任何一个数字（在下面的示例中为第一个），请使用以下代码：

Debug.Print ActiveDocument.Hyperlinks(1).Range.Text

---

在这两种情况下，您都会在IDE的即时窗口中获得文本。

到目前为止，您有哪些代码？当你找到文本时，你会怎么处理它？