En este artículo, aprenderemos la función MsgBox en Excel VBA, a continuación se muestran las configuraciones de los argumentos de los botones de msgbox vba:
| Constante | Valor | Descripción |
| vbOKOnly | 0 | Mostrar solo el botón OK. |
| vbOKCancel | 1 | Muestra los botones Aceptar y Cancelar. |
| vbAbortRetryIgnore | 2 | Muestra los botones Abortar, Reintentar e Ignorar. |
| vbYesNoCancel | 3 | Muestra los botones Sí, No y Cancelar. |
| vb Sí No | 4 | Muestra los botones Sí y No. |
| vbRetryCancel | 5 | Muestra los botones Reintentar y Cancelar. |
| vbCritical | 16 | Mostrar el icono de mensaje crítico. |
| vbQuestion | 32 | Mostrar el icono Consulta de advertencia. |
| vbExclamación | 48 | Mostrar el icono de mensaje de advertencia. |
| vbInformación | 64 | Mostrar el icono de mensaje de información. |
| vbDefaultButton1 | 0 | El primer botón es el predeterminado. |
| vbDefaultButton2 | 256 | El segundo botón es el predeterminado. |
| vbDefaultButton3 | 512 | El tercer botón es el predeterminado. |
| vbDefaultButton4 | 768 | El cuarto botón es el predeterminado. |
| vbApplicationModal | 0 | Modal de aplicación; el usuario debe responder al cuadro de mensaje antes de continuar trabajando en la aplicación actual. |
| vbSystemModal | 4096 | Modal del sistema; todas las aplicaciones se suspenden hasta que el usuario responde al cuadro de mensaje. |
| vbMsgBoxHelpButton | 16384 | Agrega el botón Ayuda al cuadro de mensaje |
| VbMsgBoxSetForeground | 65536 | Especifica la ventana del cuadro de mensaje como la ventana de primer plano |
| vbMsgBoxRight | 524288 | El texto está alineado a la derecha |
| vbMsgBoxRtlReading | 1048576 | Especifica que el texto debe aparecer como lectura de derecha a izquierda en los sistemas hebreo y árabe |
Veamos cómo el cuadro de mensaje de vba puede ayudar al usuario a eliminar todo el contenido de las celdas en la hoja de trabajo actual.
A continuación se muestra la instantánea de los datos:
Necesitamos seguir los pasos a continuación:
- Haga clic en la pestaña Desarrollador
- Desde el grupo Código, seleccione Visual Basic
- Insertemos un botón de comando
- Ingrese el siguiente código en el módulo de la hoja de trabajo actual: -
Opción explícita
Privado Sub CommandButton1_Click ()
Respuesta tenue como entero
answer = MsgBox ("¿Desea eliminar todas las celdas de la hoja actual?", vbYesNo + vbQuestion, "Eliminar todas las celdas")
Si answer = vbYes Entonces
Cells.ClearContents
Demás
'hacer nada
Terminara si
End Sub
- Al hacer clic en el botón Comando, aparecerá el siguiente mensaje
- Haga clic en el botón Sí para eliminar todas las celdas.
- El resultado será el siguiente
De esta manera, podemos eliminar todas las celdas usando el botón de comando en Excel VBA.
Cuadro de mensaje de descarga en Excel VBA