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

另请参阅

Range 对象

支持和反馈

有关于 Office VBA 或本文档的疑问或反馈? 请参阅 Office VBA 支持和反馈,获取有关如何接收支持和提供反馈的指南。