Nota
O acesso a esta página requer autorização. Pode tentar iniciar sessão ou alterar os diretórios.
O acesso a esta página requer autorização. Pode tentar alterar os diretórios.
Retorna uma coleção Hyperlinks que representa todos os hiperlinks no slide especificado. Somente leitura.
Sintaxe
expressão. Hiperligações
expressão Uma variável que representa um objeto Diapositivo .
Valor de retorno
Hiperlinks
Exemplo
Este exemplo permite ao usuário atualizar os endereços de Internet obsoletos em todos os hiperlinks da apresentação ativa.
oldAddr = InputBox("Old Internet address")
newAddr = InputBox("New Internet address")
For Each s In ActivePresentation.Slides
For Each h In s.Hyperlinks
If LCase(h.Address) = oldAddr Then h.Address = newAddr
Next
Next
Confira também
Suporte e comentários
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.