Skip to main content

Como remover a mim mesmo do campo Para/CC/BCC ao responder a todos no Outlook?

Author: Siluvia Last Modified: 2025-06-04

Se houver várias contas de email no seu Outlook, isso pode causar alguns problemas quando você responde a todos em um email recebido. Por exemplo, você recebe um email através de uma conta, mas todos os endereços de email do Outlook aparecem como destinatários nesse email. Após clicar no botão Responder a Todos, todos os endereços de email são incluídos nas caixas Para, Cc ou Bcc. Na verdade, você não quer que suas outras contas de email recebam essa resposta. Mas como se remover da resposta a todos? Este artigo recomendará métodos para alcançar isso.

Remova a mim mesmo ao enviar emails com código VBA

Um clique para me remover da resposta a todos com o Kutools para Outlook


Remova a mim mesmo ao enviar emails com código VBA

Você pode adicionar os endereços de sua conta de email dentro do seu Outlook no seguinte código VBA para evitar enviar emails para você mesmo. Por favor, siga os passos abaixo.

1. Pressione simultaneamente as teclas Alt + F11 para abrir a janela Microsoft Visual Basic for Applications.

2. Na janela Microsoft Visual Basic for Applications, clique duas vezes em Project1 > Objetos do Microsoft Outlook > ThisOutlookSession e, em seguida, copie e cole o seguinte código VBA na janela Código. Veja a captura de tela:

delete myself address from to filed when reply all using vba 1

Código VBA: remova a mim mesmo de todos os emails enviados no Outlook

Private Sub RemoveRecipientsWhenItemSend(Item As Outlook.MailItem)
	Dim RemoveAddrList As VBA.Collection
	Dim Recipients As Outlook.Recipients
	Dim aRecipient As Outlook.Recipient
	Dim i
	Dim j
	Set RemoveAddrList = New VBA.Collection
	' add addresses here
	RemoveAddrList.Add "happy.xuebi@163.com"
	RemoveAddrList.Add "siluvia@extendoffice.com"
	Set Recipients = Item.Recipients
	For i = Recipients.Count To 1 Step - 1
		Set aRecipient = Recipients.Item(i)
		For j = 1 To RemoveAddrList.Count
			If LCase$(aRecipient.Address) = LCase$(RemoveAddrList(j)) Then
				Recipients.Remove i
				Exit For
			End If
		Next
	Next
End Sub
Private Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)
	On Error Resume Next
	RemoveRecipientsWhenItemSend Item
End Sub
Agora:

1. Altere os endereços de email no código VBA para suas contas de email.

2. Certifique-se de que a opção Ativar todas as macros esteja ativada. Veja a captura de tela:

delete myself address from to filed when reply all using vba 2

3. Clique no botão Salvar e feche a janela Microsoft Visual Basic for Applications.

A partir de agora, ao enviar emails, os endereços de email especificados de suas contas do Outlook serão removidos automaticamente das caixas Para, Cc ou Bcc.


Um clique para me remover da resposta a todos com o Kutools para Outlook

Se você tiver o Kutools para Outlook, poderá remover seus endereços dos campos Para, Cc e Bcc ao enviar emails com um único clique.

 👉 O Kutools para Outlook agora tem uma versão gratuita, com 70+ recursos disponíveis gratuitamente por toda a vida. Faça o download da Versão Gratuita Agora.

Como mostra a captura de tela a seguir, para se remover da resposta a todos no Outlook, siga os passos abaixo.

delete myself address from to filed when reply all using kutools for outlook 1

1. Depois de clicar no botão Responder a Todos para criar um email de resposta, clique em Kutools > Meus Nomes. Veja a captura de tela:

delete myself address from to filed when reply all using kutools for outlook 2

Em seguida, todos os seus nomes (endereços de conta de email) serão removidos imediatamente das caixas Para, Cc ou Bcc.

delete myself address from to filed when reply all using kutools for outlook 3

Se você quiser fazer um teste gratuito dessa ferramenta, faça o download gratuito do software primeiro e, em seguida, aplique a operação conforme os passos acima.


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