Skip to main content

Como obter um aviso ou confirmação antes de enviar e-mails no Outlook?

Author: Siluvia Last Modified: 2025-06-04

Você já clicou em Enviar no Outlook, apenas para perceber momentos depois que faltaram detalhes importantes, anexou o arquivo errado ou encontrou um erro constrangedor? Para evitar esses problemas, você pode configurar o Outlook para solicitar uma confirmação sempre que você clicar no botão Enviar. Dessa forma, você terá uma segunda chance para revisar seus e-mails cuidadosamente antes que eles sejam enviados. Neste artigo, vamos guiá-lo por uma solução VBA fácil para alcançar isso.

Obtenha um Aviso ou Confirmação Antes de Enviar E-mails Usando Código VBA


Obtenha um Aviso ou Confirmação Antes de Enviar E-mails Usando Código VBA

O seguinte código VBA fará com que o Outlook peça sua confirmação toda vez que você tentar enviar um e-mail, dando-lhe a chance de verificar novamente sua mensagem.

1. Pressione "Alt" + "F11" para abrir a janela "Microsoft Visual Basic for Applications".

2. Na janela do VBA, localize o painel "Project Explorer" à esquerda. Em "Project1 (VbaProject.OTM)", clique duas vezes em "Microsoft Outlook Objects", depois clique duas vezes em "ThisOutlookSession" para abrir sua janela de código.

3. Copie e cole o seguinte código VBA na janela aberta:

Private Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)
    Dim xPrompt As String
    Dim xOkOrCancel As Integer
    On Error Resume Next
    
    xPrompt = "Do you want to continue sending this email?"
    xOkOrCancel = MsgBox(xPrompt, vbOKCancel + vbQuestion, "Confirm Email Sending")
    
    If xOkOrCancel <> vbOK Then
        Cancel = True
    End If
End Sub

the screenshot of step 3 about getting a prompt or confirmation before sending emails in Outlook using vba

4. Pressione as teclas "Alt" + "Q" para salvar e fechar o editor do VBA.

📌 Resultado: A partir de agora, cada vez que você clicar em Enviar para despachar um e-mail no Outlook, uma caixa de diálogo de confirmação aparecerá perguntando: "Deseja continuar enviando este e-mail?" Clique em "OK" para enviar ou "Cancelar" para retornar ao e-mail e continuar editando.

the screenshot of result about getting a prompt or confirmation before sending emails in Outlook using vba


📎 Nunca mais esqueça um anexo de e-mail!

Cansado de enviar e-mails sem anexos importantes? O poderoso recurso Lembre-me Quando Enviar uma Mensagem Sem Anexos no Kutools for Outlook alerta instantaneamente sempre que seu e-mail menciona palavras-chave específicas, mas não contém anexos — garantindo que você nunca mais deixe de enviar arquivos cruciais!

🌟 Recursos Principais:

  • Palavras-chave Personalizadas: Especifique seus próprios termos gatilho como "arquivo", "fatura" ou "documento".
  • Lembretes Instantâneos: Receba alertas ao clicar em "Enviar" se o e-mail contiver palavras-chave, mas não tiver anexos.
  • Configuração Fácil: Adicione ou gerencie rapidamente palavras-chave com uma interface simples.
the Remind Me When I Send a Message That’s Missing Attachments feature

Melhores Ferramentas de Produtividade para Office

Notícia de Última Hora: Kutools para Outlook Lança Versão Gratuita!

Experimente agora a nova versão GRATUITA do Kutools para Outlook, com mais de70 recursos incríveis para você usar PARA SEMPRE! Clique para baixar agora!

🤖 Kutools AI : Utiliza tecnologia avançada de IA para gerenciar emails com facilidade, incluindo responder, resumir, otimizar, expandir, traduzir e redigir emails.

📧 Automação de Email: Resposta automática (Disponível para POP e IMAP) / Agendar envio de emails / CC/BCC automático por Regra ao enviar email / Encaminhamento automático (Regra avançada) / Adicionar saudação automaticamente / Dividir automaticamente emails com múltiplos destinatários em mensagens individuais...

📨 Gerenciamento de Email: Recallar Email / Bloquear emails suspeitos por assunto e outros critérios / Excluir Emails Duplicados / Pesquisa Avançada / Organizar Pastas...

📁 Anexos Pro: Salvar em lote / Desanexar em lote / Comprimir em lote / Salvar automaticamente / Desanexar automaticamente / Auto Comprimir...

🌟 Interface Mágica: 😊Mais emojis bonitos e estilosos / Aviso quando emails importantes chegarem / Minimizar Outlook ao invés de fechar...

👍 Recursos com Um Clique: Responder a Todos com Anexos / Emails Anti-Phishing / 🕘Exibir o fuso horário do remetente...

👩🏼‍🤝‍👩🏻 Contatos & Calendário: Adicionar contatos em lote a partir de emails selecionados / Dividir um grupo de contatos em grupos individuais / Remover lembrete de aniversário...

Desbloqueie instantaneamente o Kutools para Outlook com um único clique. Não perca tempo, baixe agora e aumente sua produtividade!

kutools for outlook features1 kutools for outlook features2