Ескертпе
Бұл бетке кіру үшін қатынас шегін айқындау қажет. Жүйеге кіруді немесе каталогтарды өзгертуді байқап көруге болады.
Бұл бетке кіру үшін қатынас шегін айқындау қажет. Каталогтарды өзгертуді байқап көруге болады.
Возвращает коллекцию Hyperlinks , представляющую все гиперссылки в указанном документе. Только для чтения.
Синтаксис
expression. Гиперссылки
выражение Переменная, представляющая объект Document .
Замечания
Сведения о возврате одного члена коллекции см. в разделе Возвращение объекта из коллекции.
Пример
В этом примере отображается целевой адрес второй гиперссылки в Home.doc.
If Documents("Home.doc").Hyperlinks.Count >= 2 Then
MsgBox Documents("Home.doc").Hyperlinks(2).Name
End If
В этом примере отображается имя каждой гиперссылки в активном документе, который содержит слово "Microsoft" в адресе.
For Each aHyperlink In ActiveDocument.Hyperlinks
If InStr(LCase(aHyperlink.Address), "microsoft") <> 0 Then
MsgBox aHyperlink.Name
End If
Next aHyperlink
См. также
Поддержка и обратная связь
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.