VBA – A Função MsgBox() – Curiosidade

Esta função, por defeito, apresenta uma mensagem numa caixa de diálogo, a qual tem um botão "OK". No entanto, esta função pode apresentar outros botões e/ou um icon na caixa de diálogo.

Exemplo:

O código, para este exemplo, será:

Sub Mensagem()
    msg = MsgBox("Pretende Continuar?", vbInformation + vbYesNoCancel)
End Sub

No entanto, para obtermos este resultado, poderemos utilizar os chamados valores dos botões de argumento, como no seguinte exemplo de código:

Sub Mensagem()
    msg = MsgBox("Pretende Continuar?", 64 + 3)
End Sub

Segue-se um quadro com o nome das principais Constantes, o seu Valor e a respectiva Descrição:

Tópicos relacionados:

• Ten Tips for Microsoft Office VBA Library Development
• Visual Basic – Messages and data input/output
• Understanding the MsgBox command in Visual Basic