Criador de caixa de mensagem

O Criador de caixa de mensagem gera código para caixas de mensagem e caixas de entrada. Ele pode ser encontrado no menu UI do Editor VBA:

messagebox builder location

E na faixa de opções do Excel:

Caixa de mensagens

vba messagebox builder

As caixas de mensagem são usadas para solicitar aos usuários. A MessageBox padrão (vbOKOnly) comunica informações e simplesmente pede que o usuário clique em “ok”.

msgbox "Complete"
vba code writer

Outros tipos de MessageBox exigem que os usuários façam uma escolha (por exemplo, OK / Cancelar, Tentar novamente / Cancelar):

vba messagebox builder options

A área de visualização mostra a MessageBox configurada no momento. Basta alterar as opções e imediatamente a área de visualização mostrará o MessageBox atualizado e a área de Código gerado mostrará o código gerado:

vba messagebox builder preview

Algumas observações:

É possível definir um botão padrão clicando no botão específico na seção “Botões e botão padrão”. Esse é o botão que será pressionado se o usuário clicar em Enter quando a MessageBox for exibida. Nas duas imagens anteriores, a opção “No” foi selecionada como o botão padrão.

A MessageBox gera um valor correspondente ao botão em que o usuário clicou. Na caixa Código gerado, você pode ver que uma instrução Select Case é usada para tratar as diferentes opções:

vba messagebox builder generated code
Selecione Case answer
   Case vbYes
   Case vbNo
   Case vbCancel
End Select

O procedimento deve executar ações diferentes, dependendo se Yes, No ou Cancel for selecionado. Para isso, insira as ações desejadas na instrução Select Case:

Select Case answer
    Case vbYes
        range("a1").value = "yes"
    Case vbNo
        range("a1").value = "no" (não)
    Case vbCancel
        Ir para EndMacro
    End Select

Observação: a definição de ações não é necessária com um tipo de MessageBox OKOnly, pois somente uma opção está disponível.

Criador de caixa de entrada

vba inputbox builder

Os InputBoxes solicitam aos usuários que insiram um valor. Esse valor é atribuído a uma variável:

Dim answer As Double
answer = Application.InputBox("Interest Rate", "Enter Interest Rate", Type:=1)
vba interest rate builder

A parte InputBox do Builder funciona de forma muito semelhante à parte MessageBox. Entretanto, há duas opções que queremos destacar.

Tipo de entrada

vba messagebox builder input type

Input Type informa ao VBA que tipo de entrada deve ser esperado do usuário. Isso permite que o VBA determine se o valor inserido é válido.

Observação: para evitar erros, ao trabalhar com input type=Cell Reference, Application.ScreenUpdating deve ser definido como True: Application.ScreenUpdating = True

Valor padrão A opção de valor padrão preenche previamente a área de entrada.

vba inputbox generator default value

Comece a automatizar o Excel

Obter AutoMacro