Word) (Range.Hyperlinks 属性
返回表示指定范围中的所有超链接的 超链接 集合。 此为只读属性。
语法
表达式。链接
expression 一个表示 Range 对象的变量。
备注
有关返回集合的单个成员的信息,请参阅 从集合中返回对象。
示例
以下示例显示活动文档中前十个段落中的每个超链接的名称。
Dim objLink As Hyperlink
Dim objRange As Range
Set objRange = ActiveDocument.Range( _
Paragraphs(1).Range.Start, _
Paragraphs(10).Range.End)
For Each objLink In objRange.Hyperlinks
If InStr(LCase(objLink.Address), "microsoft") <> 0 Then
MsgBox objLink.Name
End If
Next objLink
另请参阅
支持和反馈
有关于 Office VBA 或本文档的疑问或反馈? 请参阅 Office VBA 支持和反馈,获取有关如何接收支持和提供反馈的指南。
反馈
https://aka.ms/ContentUserFeedback。
即将发布:在整个 2024 年,我们将逐步淘汰作为内容反馈机制的“GitHub 问题”,并将其取代为新的反馈系统。 有关详细信息,请参阅:提交和查看相关反馈