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'.
Parameters
Nombre | Obligatorio/opcional | Tipo de datos | Descripción |
---|---|---|---|
NewWindow | Opcional | 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. |
Método | 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. |
Observaciones
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 para 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
Consulte también
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.