Cómo usar VBA para implementar ventanas emergentes

Las ventanas emergentes se pueden implementar utilizando el método msgbox. El código simple es el siguiente:

Private Sub CommandButton1_Click()

MsgBox("Demostración de ventana emergente", vbInformation vbOkOnly. , "Esto es una ventana emergente")

End Sub

Conocimiento relevante de Msgbox utilizado en este ejemplo:

Función

En el cuadro de mensaje Muestra información en un botón, espera a que el usuario haga clic en un botón y devuelve el valor del botón en el que se hizo clic (como "Aceptar" o "Cancelar"). Generalmente se usa para mostrar el valor de una variable.

2. Sintaxis

MsgBox(Mensaje[, Botones][, Título][, Archivo de ayuda, Contexto])

Descripción del parámetro:

(1)El mensaje es un parámetro obligatorio y es una cadena que se utiliza como texto del mensaje que se muestra en el cuadro de mensaje. Su longitud máxima es de aproximadamente 1024 caracteres, dependiendo del ancho de los caracteres utilizados. Si el contenido del mensaje excede una línea, se puede separar mediante retorno de carro (Chr(13)), avance de línea (Chr(10)) o una combinación de retorno de carro y avance de línea (Chr(13)&; Chr(10). )).

(2) Botón, parámetro opcional, utilizado para el valor suma de la expresión numérica, especificando el número y la forma de visualización del botón, el estilo del icono utilizado, el botón predeterminado y el cuadro de mensaje de respuesta forzada, etc. que se puede personalizar este cuadro de mensaje. Si se omite este parámetro, el valor predeterminado es 0.

(3) Título es un parámetro opcional que indica el texto que se mostrará en la barra de título del cuadro de mensaje. Si se omite este parámetro, el nombre de la aplicación se mostrará en la barra de título.

(4)Helpfile, parámetro opcional, es una expresión de cadena que proporciona un archivo de ayuda. Si hay un archivo de ayuda, debe haber un contexto.

(5)El contexto, parámetro opcional, es una expresión numérica que se utiliza para proporcionar temas de ayuda. Si hay un contexto, debe haber un archivo de ayuda.

3. Parámetros del botón

Constantes utilizadas para los parámetros del botón en la función MsgBox

Descripción del valor constante

vbOKOnly 0 solo muestra el botón Aceptar .

VbOKCancel 1 muestra los botones Aceptar y Cancelar

VbAbortRetryIgnore 2 Muestra los botones Abortar, Reintentar y Repetir.

Mostrar los botones "Sí", "No" e "Ignorar"

VbYesNoCancel 3 Mostrar los botones "Sí", "No" e "Ignorar"

VbYesNoCancel 3 Mostrar "Sí", " Botones "No" e "Ignorar", botones No" y "Cancelar"

VbYesNo 4 muestra los botones "Sí" y "No"

VbRetryCancel 5 muestra los botones Reintentar y Cancelar

p>

VbCritical 16 Mostrar información clave "VbQuestion 32 Mostrar icono de consulta de advertencia

VbExclamation 48 Mostrar icono de mensaje de advertencia

VbInformation 64 Mostrar icono de mensaje de notificación

vbDefaultButton1 0 El primer botón es el valor predeterminado (configuración predeterminada)

vbDefaultButton2 256 El segundo botón es el valor predeterminado

vbDefaultButton3 512 El tercer botón es el valor predeterminado

vbDefaultButton4 768 El cuarto botón es el valor predeterminado

vbApplicationModal 0 La aplicación se verá obligada a regresar; la aplicación permanece suspendida hasta que el usuario responda al cuadro de mensaje

La aplicación continúa funcionando

vbSystemModal 4096 Retorno forzado del sistema; alineación

vbMsgBoxRtlReading 1048576 especifica que el texto debe ordenarse de derecha a izquierda en los sistemas hebreo y árabe

Descripción:

(1) El primer conjunto de valores (0-5) describe el tipo y la cantidad de botones que se muestran en el cuadro de mensaje; 48, 64) describe el estilo del icono; tres conjuntos de valores (0, 256, 512, 768) indican qué botón es el botón predeterminado; el cuarto conjunto de valores (0, 4096) determina el retorno forzado; del cuadro de mensaje. Al agregar estos números para crear el valor del parámetro del botón, solo se puede tomar un número de cada conjunto de valores.

(2) Estas constantes están especificadas por VBA y se pueden usar en el código del programa en lugar de los valores reales.

4. Valor de retorno

Constante utilizada para el valor de retorno de la función MsgBox

Descripción del valor constante

vbOK 1 OK

vbCancel 2 Cancelar

vbAbort 3 Terminar

vbRetry 4 Reintentar

vbIgnorar 5 Ignorar

vbSí 6 Sí

vbNo 7 No

5. Instrucciones relacionadas

(1) Si se proporcionan los parámetros de archivo de ayuda y contexto, puede presionar la tecla F1 para ver el contexto y los temas de ayuda correspondientes. Por lo general, la Ayuda de Excel se agregará automáticamente al cuadro de entrada. botón.

(2) Si el botón "Cancelar" se muestra en el cuadro de mensaje, presionar la tecla ESC tiene el mismo efecto que hacer clic en el botón "Cancelar". Si hay un botón "Ayuda" en el cuadro de información, se proporcionará información de ayuda relevante.

(3) Si desea ingresar varios parámetros y omitir algunos parámetros intermedios, debe agregar separadores de coma en las posiciones apropiadas.