Método Hyperlink.Follow (Word)
Exibe um documento armazenado no cache, associado ao objeto Hyperlinkespecificado, caso ele já tenha sido baixado. Caso contrário, este método resolve o hiperlink, baixa o documento alvo e exibe o documento no aplicativo apropriado.
Sintaxe
expressão. Siga( _NewWindow_ , _AddHistory_ , _ExtraInfo_ , , _Method_ , _HeaderInfo_ )
expressão Obrigatório. Uma variável que representa um objeto 'Hyperlink'.
Parâmetros
| Nome | Obrigatório/Opcional | Tipo de dados | Descrição |
|---|---|---|---|
| NewWindow | Opcional | Variant | True para exibir o documento alvo em uma nova janela. O valor padrão é False. |
| AddHistory | Opcional | Variant | Esse argumento é reservado para uso futuro. |
| ExtraInfo | Opcional | Variant | Uma matriz de bytes ou sequências de caracteres que especifica informações adicionais para que o HTTP resolva o hiperlink. Por exemplo, você pode usar ExtraInfo para especificar as coordenadas de um mapa de imagem, o conteúdo de um formulário ou um nome de arquivo FAT. A sequência de caracteres é remetida ou acrescentada, dependendo do valor de Method. Use a propriedade ExtraInfoRequired para determinar se são necessárias informações extras. |
| Method | Opcional | Variant | Especifica a maneira como são manipuladas as informações adicionais para HTTP. Pode ser qualquer constante MsoExtraInfoMethod. |
| HeaderInfo | Opcional | Variant | Uma string que especifica as informações do cabeçalho para a solicitação de HTTP. O valor padrão é uma sequência de caracteres vazia. Você pode combinar várias linhas de cabeçalho em uma única sequência de caracteres usando a seguinte sintaxe: "sequência1" & vbCr & "sequência2". A string especificada é convertida automaticamente em caracteres ANSI. Observe que o argumento HeaderInfo pode substituir os campos do cabeçalho HTTP padrão. |
Comentários
Quando o hiperlink usa o protocolo de arquivos, esse método abre o documento em vez de fazer o seu download.
Exemplo
Este exemplo segue o primeiro hiperlink de Home.doc.
Documents("Home.doc").HyperLinks(1).Follow
Este exemplo insere um hiperlink para www.msn.com e, em seguida, segue o hiperlink.
Dim hypTemp As Hyperlink
With Selection
.Collapse Direction:=wdCollapseEnd
.InsertAfter "MSN "
.Previous
End With
Set hypTemp = ActiveDocument.Hyperlinks.Add( _
Address:="https://www.msn.com", _
Anchor:=Selection.Range)
hypTemp.Follow NewWindow:=False, AddHistory:=True
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.