MsgBox VBA Excel

Sintaxis:

MsgBox [mensaje], [botones], [título], [archivo de ayuda], [contexto]

Sub Mensaje()

    MsgBox "Mensaje de prueba", vbOKOnly + vbInformation, "Excel Consultor"


End Sub

Argumentos de la función:

Mensaje:
Es el mensaje que se mostrará en el mensaje. El máximo de caracteres es aproximadamente 1024. Puedes mostrar un mensaje con varias líneas, y para separa las líneas puedes usar vbNewLine o Chr(13).

Botones: 
Opcionalmente puedes mostrar más de un botón, si no especificas este parámetro se mostrara el botón Aceptar. También puede mostrar un ícono junto al texto.

Título: 
Opcionalmente puedes definir un título al mensaje.

Archivo de ayuda:
Es un archivo de ayuda que proporciona información sobre el cuadro de diálogo.


Contexto: 
Define el tema que tratará la ayuda del cuadro de diálogo.


Uso de MsgBox para ejecutar acciones a realizar:

Sub AceptarCancelar()

Dim Pregunta As Integer


Pregunta = MsgBox("¿Deseas continuar?", vbOKCancel, "Excel Consultor")


    If Pregunta = 2 Then MsgBox "Se canceló la ejecución", , "Excel Consultor": Exit Sub

   
    'Se puede usar este botón para ejecutar macros

    'cuya ejecución dependerá si se presiona el botón aceptar.

    
    ' === > .................... En este espacio colocaríamos la acción a realizar.

   
    MsgBox "Se ejecutó satisfactoriamente", , "Excel Consultor"

   
    'Terminada la ejecución se puede mostrar un mensaje.

End Sub

Mostrar archivo de ayuda en el MsgBox:

Sub Ayuda()

strRuta = ThisWorkbook.Path & "\CHM-example.chm"

MsgBox "Hola Mundo", vbOKCancel + vbCritical + vbMsgBoxHelpButton, "Mensaje especial", strRuta, 20000

End Sub

El archivo de ayuda CHM-example debe estar ubicado dentro de la misma carpeta donde se encuentra el archivo Excel que contiene la macro.