Word VBA教程:Hyperlinks属性

返回代表指定文档、区域或所选内容中的所有超链接的Hyperlinks集合。只读。

有关返回集合中单个成员的内容,请参阅返回集合中的对象

VBA示例

本示例显示 Home.doc 中第二个超链接的目标地址。


If Documents("Home.doc").Hyperlinks.Count >= 2 Then
    MsgBox Documents("Home.doc").Hyperlinks(2).Name
End If

本示例跳至选定部分第一个超链接的地址。


If Selection.Hyperlinks.Count >= 1 Then
    Selection.Hyperlinks(1).Follow
End If

本示例显示活动文档中在地址中含有单词“Microsoft”的超链接的名字。


For Each aHyperlink In ActiveDocument.Hyperlinks
    If InStr(LCase(aHyperlink.Address), "microsoft") <> 0 Then
        MsgBox aHyperlink.Name
    End If
Next aHyperlink

Word VBA教程

Word VBA参考教程:目录1 Word VBA参考教程:目录2
Word VBA参考教程:目录3 Word VBA参考教程:目录4
Word VBA参考教程:目录5 Word VBA参考教程:目录6
Word VBA参考教程:目录7 Word VBA参考教程:目录8
Word VBA参考教程:目录9 Word VBA参考教程:目录10
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号