Note: The other languages of the website are Google-translated. Back to English
Log in  \/ 
x
or
x
Inscreva-se  \/ 
x

or

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 deixar de responder a todos com 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 > ThisOutlookSessione, 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 "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

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 deixar de responder a todos com 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.


Kutools for Outlook - traz 100 recursos avançados para o Outlook e torna o trabalho muito mais fácil!

  • Auto CC / BCC por regras ao enviar e-mail; Avanço automático Vários emails por encomenda; Resposta automatica sem servidor Exchange e mais recursos automáticos ...
  • Aviso BCC - mostrar mensagem quando você tentar responder a todos se o seu endereço de e-mail estiver na lista BCC; Lembrar quando houver anexos ausentes, e mais recursos de lembrete ...
  • Responder (todos) com todos os anexos na conversa de correio; Responder muitos e-mails em segundos; Adicionar saudação automaticamente quando responder; Adicionar data ao assunto ...
  • Ferramentas de anexo: gerenciar todos os anexos em todos os e-mails, Desanexação Automática, Comprimir tudo, Renomear tudo, Salvar tudo ... Relatório rápido, Contar e-mails selecionados...
  • Lixo eletrônico poderoso por costume; Remover e-mails e contatos duplicados... Permite que você faça de maneira mais inteligente, rápida e melhor no Outlook.
shot kutools outlook kutools tab 1180x121
shot kutools outlook kutools plus tab 1180x121
 
Say something here...
symbols left.
You are guest
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.

Be the first to comment.