Método Hyperlink.Follow (Word)

Muestra un documento almacenado en memoria caché asociado con el objeto Hyperlink especificado, si ya se ha descargado. De lo contrario, este método resuelve el hipervínculo, descarga el documento de destino y muestra el documento en la aplicación apropiada.

Sintaxis

expresión. Follow( _NewWindow_ , _AddHistory_ , _ExtraInfo_ , _Method_ , _HeaderInfo_ )

expresión requerida. Variable que representa un objeto 'Hyperlink'.

Parámetros

Nombre Obligatorio/opcional Tipo de datos Descripción
NewWindow Optional Variant True para mostrar el documento de destino en una nueva ventana. El valor predeterminado es False.
AddHistory Opcional Variant Este argumento se reserva para uso futuro.
ExtraInfo Opcional Variant Cadena o matriz de bytes que especifica la información adicional que HTTP va a utilizar para resolver el hipervínculo. Por ejemplo, puede utilizar ExtraInfo para especificar las coordenadas de un mapa de imagen, el contenido de un formulario o un nombre de archivo FAT. La cadena se envía o se anexa, en función del valor de Method. Use la propiedad ExtraInfoRequired para determinar si se necesita información adicional.
Method Opcional Variant Especifica el modo en que se trata la información adicional de HTTP. Puede ser cualquier constante MsoExtraInfoMethod.
HeaderInfo Opcional Variant Cadena que especifica la información de encabezado de la solicitud HTTP. El valor predeterminado es una cadena vacía. Se pueden combinar varias líneas de encabezado en una sola cadena utilizando la sintaxis siguiente: "cadena1" & vbCr & "cadena2". La cadena especificada se convierte automáticamente en caracteres ANSI. Tenga en cuenta que el argumento HeaderInfo podría sobrescribir campos de encabezado HTTP predeterminados.

Comentarios

Si el hipervínculo utiliza el protocolo de archivo, este método abre el documento en lugar de descargarlo.

Ejemplo

En este ejemplo se sigue el primer hipervínculo de Home.doc.

Documents("Home.doc").HyperLinks(1).Follow

En este ejemplo se inserta un hipervínculo a www.msn.com y, a continuación, se sigue el hipervínculo.

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

Vea también

Hyperlink (objeto)

Soporte técnico y comentarios

¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.