Tempo de leitura: 2 minutos
Sintaxe das caixas de diálogo no VBA
Ferramenta muito útil no VBA é a função MsgBox. Esta função, exibe uma caixa de diálogo bem simples que pode ser utilizada para prover o usuário de informações ou solicitar que decida o fluxo de execução do código.
Sintaxe mais comum:
MsgBox(Prompt, [Buttons], [Title])
Prompt: Obrigatória. Expressão de seqüência de caracteres exibida como mensagem na caixa de diálogo. O comprimento máximo de prompt é de aproximadamente 1.024 caracteres, dependendo da largura dos caracteres utilizados.
Buttons: Opcional. Estabelece os botões e sinais gráficos que devem figurar na caixa de diálogo
Title:Opcional. Expressão de seqüência de caracteres exibida na barra de título da caixa de diálogo.
Destacando alguns pontos:
- Para o valor de Prompt, utilizei um variável que contém uma cadeia de texto com uma quebra de linha. Esta quebra é obtida unindo duas cadeias de texto através do caractere de quebra (vbLf).
- Para o valor de Buttons, definida a exibição apenas de um botão Ok (vbOKOnly).
- A caixa de diálogo deve ser atribuída a uma variável, neste caso CxDialog.
É possível exibir diferentes combinações de botões e alguns diferentes ícones (apenas um por vez) na caixa de diálogo através dos valores adequados para a variável Buttons.
Eis possíveis valores que podem ser utilizados.
Constante | Descrição |
VbOKOnly | Exibe somente o botão OK. |
VbOKCancel | Exibe os botões OK e Cancelar. |
VbAbortRetryIgnore | Exibe os botões Abortar, Repetir e Ignorar. |
VbYesNoCancel | Exibe os botões Sim, Não e Cancelar. |
VbYesNo | Exibe os botões Sim e Não. |
VbRetryCancel | Exibe os botões Repetir e Cancelar. |
vbCritical | Exibe o ícone Mensagem crítica. |
vbQuestion | Exibe o ícone Consulta de aviso. |
vbExclamation | Exibe o ícone Mensagem de aviso. |
vbInformation | Exibe o ícone Mensagem de informação. |
vbDefaultButton1 | O primeiro botão é o padrão. |
vbDefaultButton2 | O segundo botão é o padrão. |
vbDefaultButton3 | O terceiro botão é o padrão. |
vbDefaultButton4 | O quarto botão é o padrão. |
vbApplicationModal | Janela restrita do aplicativo; o usuário deve responder à caixa de mensagem antes de continuar o trabalho no aplicativo atual. |
vbSystemModal | Janela restrita de sistema; todos os aplicativos são suspensos até que o usuário responda à caixa de mensagem. |
vbMsgBoxHelpButton | Adiciona o botão ‘Ajuda’ à caixa de mensagens |
VbMsgBoxSetForeground | Especifica a janela da caixa de mensagens como a janela de primeiro plano |
vbMsgBoxRight | O texto é alinhado à direita |
vbMsgBoxRtlReading | Especifica que o texto deve aparecer como leitura da direita para a esquerda em sistemas hebraico e árabe |
Após clicarmos num botão da caixa de diálogo é retornado um valor para a variável à qual a caixa foi atribuída. Desta forma é possível identificar qual foi o valor selecionado pelo usuário.
Botão | Constante |
OK | vbOK |
Cancelar | vbCancel |
Abortar | vbAbort |
Repetir | vbRetry |
Ignorar | vbIgnore |
Sim | vbYes |
Não | vbNo |