Word) (Range.Hyperlinks 屬性

會傳回 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 支援與意見反應。