Objeto Hyperlinks (Word)
Representa a coleção de hiperlink objetos em um documento, intervalo ou seleção.
Use a propriedade Hyperlinks para retornar a coleção Hyperlinks. O exemplo a seguir verifica todos os hiperlinks no documento para um link que contém a palavra "Microsoft" no endereço. Se for encontrado um hiperlink, ele será ativado com o método Follow.
For Each hLink In Documents(1).Hyperlinks
If InStr(hLink.Address, "Microsoft") <> 0 Then
hLink.Follow
Exit For
End If
Next hLink
Use a Adicionar método cria um hiperlink e adicioná-lo à coleção Hyperlinks. O exemplo a seguir cria um novo hiperlink para o site do MSN.
ActiveDocument.Hyperlinks.Add Address:="https://www.msn.com/", _
Anchor:=Selection.Range
Use Hyperlinks (Index), onde Index é o número de índice, para retornar um único objeto Hyperlink em um documento, intervalo ou seleção. O exemplo seguinte ativa o primeiro hiperlink da seleção.
If Selection.HyperLinks.Count >= 1 Then
Selection.HyperLinks(1).Follow
End If
A propriedade Count dessa coleção em um documento retorna o número de itens no texto principal. Para contar itens em outros textos usam a coleção com o objeto de intervalo.
Nome |
---|
Aplicativo |
Count |
Creator |
Parent |
Referência do modelo de objeto do Word
Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.