Note: The other languages of the website are Google-translated. Back to English
Se connecter  \/ 
x
or
x
S’enregistrer  \/ 
x

or

Comment me retirer de la réponse à tous dans Outlook?

S'il existe plusieurs comptes de messagerie dans votre Outlook, cela causera des problèmes lorsque vous répondez à tous à un e-mail reçu. Par exemple, si vous recevez un e-mail via un compte, mais que toutes les adresses de votre compte de messagerie Outlook s'affichent en tant que destinataires dans cet e-mail, après avoir cliqué sur le bouton Répondre à tous, toutes les adresses de compte de messagerie sont incluses dans la zone À, Cc ou Cci. Mais en fait, vous ne voulez pas que d'autres comptes de messagerie de vous-même reçoivent cet e-mail de réponse. Mais comment me retirer de la réponse à tous? Cet article vous recommandera des méthodes pour y parvenir.

Supprimer moi-même lors de l'envoi d'e-mails avec le code VBA
Un clic pour me retirer de la réponse à tous avec Kutools for Outlook


Supprimer moi-même lors de l'envoi d'e-mails avec le code VBA

Vous pouvez ajouter les adresses de votre compte de messagerie dans votre Outlook dans le code VBA suivant pour éviter de vous envoyer des e-mails. Veuillez faire comme suit.

1. presse autre + F11 touches simultanément pour ouvrir le Microsoft Visual Basic pour applications fenêtre.

2. dans le Microsoft Visual Basic pour applications fenêtre, double-cliquez sur Project1 > Objets Microsoft Outlook > Cette session Outlook, puis copiez et collez sous le code VBA dans la fenêtre Code. Voir la capture d'écran:

Code VBA: me retirer de tous les e-mails d'envoi dans 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

Notes:

1. Veuillez changer les adresses e-mail dans le code VBA pour vos comptes de messagerie.
2. Assurez-vous que l'option Activer toutes les macros est activée. Voir la capture d'écran:

3. Cliquez sur l' et fermez le Microsoft Visual Basic pour applications fenêtre.

Désormais, lorsque vous envoyez des e-mails, les adresses e-mail spécifiées de vos comptes Outlook seront automatiquement supprimées de la zone À, Cc ou Cci.


Un clic pour me retirer de la réponse à tous avec Kutools for Outlook

Comme illustré ci-dessous, pour me retirer de la réponse à tous dans Outlook, procédez comme suit.

1. Après avoir cliqué sur le bouton Répondre à tous pour créer un e-mail de réponse, cliquez sur Kutools > Je m'appelle. Voir la capture d'écran:

Ensuite, tous vos noms (adresses de compte e-mail) sont immédiatement supprimés de la zone À, Cc ou Cci.

Si vous souhaitez avoir un essai gratuit de cet utilitaire, rendez-vous sur télécharger gratuitement le logiciel d'abord, puis appliquez l'opération selon les étapes ci-dessus.


Kutools for Outlook - Apporte 100 fonctionnalités avancées à Outlook et simplifie grandement le travail!

  • CC / BCC automatique par des règles lors de l'envoi d'e-mails; Transfert automatique Emails multiples par coutume; Réponse automatique sans serveur d'échange, et plus de fonctionnalités automatiques ...
  • Avertissement BCC - afficher le message lorsque vous essayez de répondre à tous si votre adresse e-mail est dans la liste BCC; Rappeler en cas de pièces jointes manquantes, et plus de fonctionnalités de rappel ...
  • Répondre (à tous) avec toutes les pièces jointes dans la conversation par courrier électronique; Répondre à de nombreux e-mails en secondes; Ajouter un message d'accueil automatique quand répondre; Ajouter la date au sujet ...
  • Outils de pièces jointes: gérer toutes les pièces jointes dans tous les courriers, Détachement automatique, Compresser tout, Tout renommer, Tout enregistrer ... Rapport rapide, Compter les courriers sélectionnés...
  • Courriels indésirables puissants par coutume; Supprimer les messages et contacts en double... Vous permettre de faire plus intelligemment, plus rapidement et mieux dans Outlook.
tir kutools outlook onglet kutools 1180x121
tir kutools outlook kutools plus onglet 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.