Programando o Excel ® Vba Para Leigos - 2ª Ed 2013 NoDRM (1)

238 Parte IV: Como se Comunicar com Seus Usuários
Figura
15-2: Uma
simples
caixa de
mensagem,
com
dois
botões.
A Figura 15-2 mostra como ela se parece. Quando você executa esse
procedimento, a variável Ans é designada a um valor, seja vbYes ou
vbNo, dependendo de qual botão o usuário clicar. A declaração Select
Case usa o valor Ans para determinar qual ação o código deve executar.
Você também pode usar o resultado da função MsgBox sem usar uma
variável, como demonstra o seguinte exemplo:
Sub GetAnswer2()
If MsgBox(“Continue?”, vbYesNo) = vbYes Then
‘ ...[code if Yes is clocked]...
Else
‘ ...[code if Yes is not clicked]...
End If
End Sub
Personalizando caixas de mensagem
A flexibilidade dos botões de argumento facilitam a personalização de
suas caixas de mensagem. Você pode especificar quais botões exibir,
determinar se um ícone aparece e decidir qual botão é o padrão (o
botão padrão é “clicado” se o usuário pressionar Enter).
A Tabela 15-2 relaciona algumas das constantes integradas que você
pode usar para os botões de argumento. Se preferir, você pode usar o
valor ao invés de uma constante (mas eu creio que usar as constantes
integradas é muito mais fácil).
Tabela 15-2 Constantes Usadas na Função MsgBox
Constante Valor O Que Ela Faz
vbOKOnly 0 Exibe apenas o botão OK.
vbOKCancel 1 Exibe os botões OK e Cancel.
vbAbortRetryIgnore 2 Exibe os botões Abort, Retry e Ignore
vbYesNoCancel 3 Exibe os botões Yes, No e Cancel.
vbYesNo 4 Exibe os botões Yes e No.