Como não posso responder a todos no Outlook?

Se houver várias contas de e-mail em seu Outlook, isso causará alguns problemas quando você responder a todos os e-mails recebidos. Por exemplo, se você receber um e-mail por meio de uma conta, mas todos os endereços de sua conta de e-mail do Outlook forem exibidos como destinatários neste e-mail, após clicar no botão Responder a todos, todos os endereços de contas de e-mail serão incluídos na caixa Para, Cc ou Cco. Mas, na verdade, você não quer que outras contas de e-mail suas recebam este e-mail de resposta. Mas como me impedir de responder a todos? Este artigo irá recomendar métodos para alcançá-lo.

Remover a mim mesmo ao enviar e-mails com código VBA
Um clique para sair da resposta a todos com o Kutools para Outlook

Remover a mim mesmo ao enviar e-mails com código VBA

Você pode adicionar os endereços da sua conta de e-mail no Outlook no seguinte código VBA para evitar o envio de e-mails para você mesmo. Faça o seguinte.

1. Pressione outro + F11 simultaneamente para abrir o Microsoft Visual Basic para Aplicações janela.

2. No Microsoft Visual Basic para Aplicações janela, clique duas vezes no Project1 > Objetos do Microsoft Outlook > Esta sessão do Outlooke, a seguir, copie e cole o código VBA abaixo na janela Código. Veja a imagem:

Código VBA: remover a mim mesmo de todos os envios de e-mails 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 ""
	RemoveAddrList.Add ""
	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

Notas:

1. Altere os endereços de e-mail no código VBA para suas contas de e-mail.

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

3. Clique na Salvar botão e feche o Microsoft Visual Basic para Aplicações janela.

De agora em diante, ao enviar e-mails, os endereços de e-mail especificados de suas contas do Outlook serão removidos automaticamente da caixa Para, Cc ou Cco automaticamente.

Um clique para sair da resposta a todos com o Kutools para Outlook

Como mostrado a seguir, para remover a resposta a todos no Outlook, faça o seguinte.

1. Após clicar no botão Responder a todos para criar um e-mail de resposta, clique em Kutools > Meu nome é. Veja a imagem:

Em seguida, todos os seus nomes (endereços de contas de e-mail) são removidos da caixa Para, Cc ou Cco imediatamente.

Se você deseja ter um teste gratuito deste utilitário, vá para baixe gratuitamente o software primeiro e, em seguida, aplique a operação de acordo com as etapas acima.