Cuadro de mensaje

Cuadro de mensaje

VBA   Abr 11, 2022    0   1394  Agregar a la lista de lectura

Iconos del cuadro de mesaje [ MsgBox ]

VBA le brinda la posibilidad de agregar uno de los cuatro iconos a sus cuadros de mensaje:

vbInformation icono de cuadro de mensaje de información vba
vbCritical vba critical msgbox icon
vbQuestion vba question msgbox icon
vbExclamation vba exclamation msgbox icon

 

Ejemplo: con vbQuestion  

Sub MsgYesNoCancel()
 
Dim Pregunta As Integer
Pregunta = MsgBox("Ejemplo de: Si | No | Cancelar", vbYesNoCancel + vbQuestion, "ExcelFx")
 
  If Pregunta = vbYes Then
    MsgBox "Respondio Si"
  ElseIf Pregunta = vbNo Then
    MsgBox "Respondio No"
  Else
    MsgBox "Respondio Cancelar"
  End If
 
End Sub

Tags