Como criar automaticamente o nome caro do remetente ao responder uma mensagem no Outlook?
Ao responder e-mails no Outlook, é comum começar com uma saudação educada, como “Caro João,” seguida de uma mensagem como “Bom dia!” Entretanto, digitar isso manualmente toda vez pode ser tedioso e demorado. Este tutorial apresenta dois métodos eficazes para inserir automaticamente o nome do remetente e a saudação ao responder mensagens no Outlook:
Método 1: Adicionar automaticamente saudações com VBA ao responder e-mails (Flexível, mas configuração manual)
Método 2: Adicionar automaticamente saudação ao responder ou encaminhar com Kutools for Outlook 👍 (Rápido & Fácil)
Método 1: Adicionar automaticamente saudações com VBA ao responder e-mails
O seguinte código VBA ajuda você a inserir automaticamente uma saudação personalizada (por exemplo, "Caro João, Bom dia!") no corpo da resposta com base no horário do dia.
Passo 1: Abrir o Editor VBA no Outlook
1. Pressione Alt + F11 para abrir a janela Microsoft Visual Basic for Applications.
2. No painel esquerdo em "Projeto1 (VbaProject.OTM)", expanda "Microsoft Outlook Objects" e clique duas vezes em "ThisOutlookSession".
Passo 2: Inserir o Código VBA
Copie e cole o seguinte código VBA no editor:
Public WithEvents GExplorer As Outlook.Explorer
Public WithEvents GMailItem As Outlook.MailItem
Private Sub Application_Startup()
Set GExplorer = Outlook.Application.ActiveExplorer
End Sub
Private Sub GExplorer_SelectionChange()
Dim xItem As Object
On Error Resume Next
Set xItem = GExplorer.Selection.Item(1)
If xItem.Class <> olMail Then Exit Sub
Set GMailItem = xItem
End Sub
Private Sub GMailItem_Reply(ByVal Response As Object, Cancel As Boolean)
AutoAddGreetingToReply Response
End Sub
Private Sub GMailItem_ReplyAll(ByVal Response As Object, Cancel As Boolean)
AutoAddGreetingToReply Response
End Sub
Sub AutoAddGreetingToReply(Item As Object)
Dim xGreetStr As String
Dim xReplyMail As MailItem
Dim xSenderName As String
Dim xRecipient As Recipient
On Error Resume Next
If Item.Class <> olMail Then Exit Sub
Set xReplyMail = Item
For Each xRecipient In xReplyMail.Recipients
If xSenderName = "" Then
xSenderName = xRecipient.Name
Else
xSenderName = xSenderName & "," & xRecipient.Name
End If
Next xRecipient
Select Case Time
Case 0.3 To 0.5
xGreetStr = " Good morning!"
Case 0.5 To 0.75
xGreetStr = " Good afternoon!"
Case Else
xGreetStr = " Good evening!"
End Select
With xReplyMail
.Display
.HTMLBody = "Dear " & xSenderName & "," & xGreetStr & "" & .HTMLBody
End With
End Sub
Passo 3: Salvar o Código VBA e Reiniciar o Outlook
1. Pressione Ctrl + S para salvar o projeto.
2. Feche o editor VBA e reinicie o Outlook para que o código tenha efeito.
Resultado:
Sempre que você responder a um e-mail, o Outlook inserirá automaticamente uma saudação no início do corpo da mensagem.
Limitações do Método VBA:
- ❌ Configuração Manual Necessária : Você deve acessar e editar o editor VBA.
- ❌ Macros Devem Estar Ativadas: Alguns ambientes do Outlook podem bloquear macros.
- ❌ Formatação Básica: O estilo da saudação é limitado, a menos que você modifique o código ainda mais.
📅 Insira automaticamente a data no assunto ou na assinatura instantaneamente!
Cansado de adicionar datas manualmente aos e-mails? Com o Kutools para Outlook, você pode inserir automaticamente a data atual no assunto ou na assinatura do e-mail toda vez que criar, responder ou encaminhar uma mensagem. Configure uma vez e deixe o Kutools fazer o resto! 🚀
💡 Dica rápida: Clique em Kutools > Opções e ative a inserção de data nas assinaturas ou nos assuntos.
✅ Adicionar automaticamente a data nas linhas de assunto
✅ Funciona em novos e-mails e respostas
Método 2: Adicionar automaticamente saudação ao responder ou encaminhar com Kutools for Outlook 👍
Se você deseja uma abordagem mais rápida e sem código, o "Kutools for Outlook" oferece um recurso de Saudação integrado que adiciona automaticamente o nome do remetente com uma saudação ao responder ou encaminhar e-mails.
Desbloqueie a máxima eficiência de e-mail com o Kutools para Outlook! Acesse 70 recursos poderosos totalmente grátis, para sempre. Faça o download da Versão Gratuita Agora!
1. Clique em "Kutools" > "Opções" para abrir a caixa de diálogo "Opções".
2. Na caixa de diálogo "Opções", configure o seguinte:
- 1). Vá para a aba "Responder".
- 2). Marque a opção "Adicionar saudação ao criar, responder e encaminhar um email". Por padrão, ele mostrará Olá <<SenderName>>, na caixa.
- 3). Clique em OK para salvar as configurações.
📌 Resultado: A partir de agora, toda vez que você responder ou encaminhar um e-mail, o Kutools irá inserir automaticamente uma saudação no início do corpo da mensagem.
Vantagens do Método Kutools for Outlook:
- ✅ Sem Código Necessário: Habilite-o com apenas alguns cliques.
- ✅ Totalmente Personalizável: Use diferentes marcadores e estilos de saudação.
- ✅ Funciona para Respostas e Encaminhamentos: Aplica-se automaticamente a ambos.
- ✅ Fluxo de Trabalho Mais Rápido: Economiza tempo com zero esforço de configuração após habilitar.
Qual método você deve usar?
Aqui está uma comparação rápida dos dois métodos para ajudá-lo a escolher o que melhor atende às suas necessidades:
| Método | Melhor Para | Facilidade de Uso | Tempo de Configuração | Flexibilidade |
|---|---|---|---|---|
| Método 1: VBA | Usuários que precisam de uma solução personalizada baseada em script | ⭐⭐ | ⏳ Longo | ⭐⭐⭐⭐ |
| Método 2: Kutools for Outlook | Usuários que querem uma experiência rápida e sem código | ⭐⭐⭐⭐⭐ | ⚡ Rápido | ⭐⭐⭐⭐⭐ |
Recomendação Final:
Se você se sente confortável com VBA e precisa de controle avançado sobre o conteúdo da saudação, o Método 1 é uma boa escolha. Mas para a maioria dos usuários, o Método 2 com Kutools for Outlook é a maneira mais fácil e eficiente de adicionar saudações automaticamente com configuração mínima e zero codificação.
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!
📧 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...
