Поделиться через

Свойство Range.Hyperlinks (Word)

  • Статья

Возвращает коллекцию 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 и обратная связь.