¿Cómo crear un hipervínculo para un botón de comando a una dirección URL en Excel?

En Excel, puede ser fácil para nosotros crear un hipervínculo para un botón de forma, pero, ¿ha intentado alguna vez crear un hipervínculo para un botón de comando? Cuando haga clic en el botón de comando, lo llevará al sitio web URL especificado que necesita. En este artículo, presentaré algunos trucos rápidos y fáciles para manejar esta tarea en Excel.

Crear un hipervínculo para un botón de comando a una dirección URL con código VBA

Crear un hipervínculo para un botón de comando a una dirección URL con código VBA

Para crear un hipervínculo para un botón de comando, siga los siguientes pasos:

1. Haga clic en Desarrollador > Insertar > Botón de Comando (Control ActiveX), y luego dibuje un botón como se muestra en la siguiente captura de pantalla:

2. Después de insertar el botón de comando, haga clic derecho sobre él y elija Propiedades en el menú contextual. En el cuadro de diálogo Propiedades, haga clic en la pestaña Categorizado, e introduzca la dirección completa del sitio web que desea vincular en el cuadro de texto Título, vea la siguiente captura de pantalla:

3. Luego cierre el cuadro de diálogo, y haga clic derecho en la pestaña de la hoja que contiene el botón de comando, y seleccione Ver Código desde el menú contextual. En la ventana abierta de Microsoft Visual Basic para Aplicaciones, copie y pegue el siguiente código en el Módulo en blanco:

Código VBA: hipervínculo a un botón de comando:

Private Sub CommandButton1_Click()
ActiveWorkbook.FollowHyperlink _
Address:=CommandButton1.Caption
End Sub

Nota: En el código anterior, CommandButton1 es el nombre del botón de comando creado, por favor cámbielo según sea necesario.

4. Y luego guarde el código, y salga del Modo Diseño. Ahora, cuando haga clic en el botón de comando, lo llevará a la página web específica.

Consejos: Si el título en el botón de comando no es la dirección URL, solo es una cadena de texto como se muestra en la siguiente captura de pantalla:

Puede aplicar el siguiente código VBA para lograrlo:

Código VBA: hipervínculo a un botón de comando:

Private Sub CommandButton1_Click()
ActiveWorkbook.FollowHyperlink _
Address:="https://www.extendoffice.com"
End Sub

Nota: En el código anterior, CommandButton1 es el nombre del botón de comando creado, y debe reemplazar la dirección del sitio web https://www.extendoffice.com por su propia dirección URL.