En un form VBA hacer un botón a página web

[Hola

No das muchos detalles pero suponiendo que tienes instalado el "Chrome", prueba así:

Private Sub CommandButton1_Click()
Dim chromePath As String
chromePath = """C:\Program Files (x86)\Google\Chrome\Application\chrome.exe"""
Shell (chromePath & "www.google.com.pe")
End Sub

Comentas

Abraham Valencia

¡Gracias!, me marca un error en la línea de shell no se porque, ¿alguna otra sugerencia?

¿Tienes instalado el "Chrome"? Si lo tienes ¿está instalado en la carpeta predeterminada o lo instalaste en otra? ¿Qué mensaje de error exacto te da? ¿Modificaste algo o lo copiaste tal cual? ¿Estás seguro que esa es la línea del error? etc.

Abraham Valencia

Si, si lo tengo instalado, use este código y me funcionó,

Sub Image1_Click() 

   enlace = "https://www.youtube.com/watch?v=rUBiYPXJlNk&t=46s"
   ActiveWorkbook.FollowHyperlink Address:=enlace, NewWindow:=True
End Sub