Saltar al contenido

macro que ejcute una pagina web determinada


ducados

Recommended Posts

Hola buen dia

Le servirá este código?:

Option Explicit
Private Sub Google_Click()
Dim Pagina As String
Pagina = "http://www.google.com.ve"
On Error GoTo Pagina
ActiveWorkbook.FollowHyperlink Address:=Pagina, NewWindow:=True
Exit Sub
Pagina:
MsgBox "No se puede abrir la pagina" & " " & Pagina & vbCrLf & "No se encontro el servidor o proxy de internet", vbExclamation, "Pagina no encontrada"
End Sub
[/PHP]

Puedes ver un ejemplo en Ideas y Aportes.

https://www.ayudaexcel.com/foro/ideas-aportes-64/followhyperlink-excel-para-abrir-pagina-google-31031/

Saludos.

Enlace a comentario
Compartir con otras webs

Archivado

Este tema está ahora archivado y está cerrado a más respuestas.

×
×
  • Crear nuevo...

Información importante

Echa un vistazo a nuestra política de cookies para ayudarte a tener una mejor experiencia de navegación. Puedes ajustar aquí la configuración. Pulsa el botón Aceptar, si estás de acuerdo.