¿Cómo crear un cuadro de mensaje con opciones Sí/No antes de ejecutar una macro en Excel?
En Excel, puede desencadenar directamente una macro pulsando la tecla F5 o haciendo clic en el botón Ejecutar en la ventana de Microsoft Visual Basic para Aplicaciones. Sin embargo, a veces puede interesarle crear un cuadro de mensaje que pregunte al usuario si desea ejecutar la macro: si responde que sí, el código continúa ejecutándose; si responde que no, se detiene. En este artículo le explicaré cómo crear un cuadro de mensaje de sí/no antes de ejecutar una macro en Excel.
Crear un cuadro de mensaje de sí/no antes de ejecutar una macro con código VBA
Crear un cuadro de mensaje de sí/no antes de ejecutar una macro con código VBA
El siguiente código VBA le permitirá añadir un cuadro de confirmación con opciones Sí/No para verificar si desea ejecutar una macro. Siga estos pasos:
1. Mantenga pulsadas las teclas ALT + F11 para abrir la ventana de Microsoft Visual Basic para Aplicaciones.
2. Haga clic en Insertar > Módulo y pegue la siguiente macro en la ventana del Módulo.
Código VBA: Crear un cuadro de mensaje de sí/no antes de ejecutar una macro:
Sub continue()
CarryOn = MsgBox("Do you want to run this macro?", vbYesNo, "Kutools for Excel")
If CarryOn = vbYes Then
'put rest of code here
End If
End Sub
Nota: En el código anterior, copie y pegue su propio código —sin las líneas de encabezado Sub ni la de cierre End Sub— entre las instrucciones If CarryOn = vbYes Then y End If. Vea la captura de pantalla:
3. A continuación, pulse la tecla F5. Aparecerá un cuadro de diálogo que le preguntará si desea ejecutar este código. Haga clic en el botón Sí para continuar o en el botón No para detenerlo. Vea la captura de pantalla：
Las mejores herramientas de productividad para Office
Potencie sus habilidades en Excel con Kutools para Excel y experimente una eficiencia como nunca antes.Kutools para Excel ofrece más de 300 funciones avanzadas para aumentar su productividad y Ahorrar tiempo.Haga clic aquí para obtener la función que más necesita...
Office Tab aporta una interfaz con pestañas a Office y hace que su trabajo sea mucho más fácil
- Active la edición y lectura con pestañas en Word, Excel, PowerPoint, Publisher, Access, Visio y Project.
- Abra y cree varios documentos en nuevas pestañas dentro de la misma ventana, en lugar de hacerlo en ventanas separadas.
- ¡Aumente su productividad en un 50 % y elimine cientos de clics del ratón cada día!
Todos los complementos de Kutools en un solo instalador.
Kutools for Office es la suite que incluye complementos para Excel, Word, Outlook y PowerPoint, además de Office Tab Pro, ideal para equipos que trabajan en distintas aplicaciones de Office.
- Suite integral— complementos para Excel, Word, Outlook y PowerPoint + Office Tab Pro
- Un instalador, una licencia— configuración en minutos (compatible con MSI)
- Rendimiento mejorado en conjunto— productividad optimizada en todas las aplicaciones de Office
- Prueba gratuita de 30 días con todas las funciones— sin registro ni tarjeta de crédito
- La mejor relación calidad-precio— ahorre frente a la compra individual de complementos