Comment me retirer des champs À/CC/CCI lors d'une réponse à tous dans Outlook ?
Si vous avez plusieurs comptes de messagerie dans votre Outlook, cela peut causer certains problèmes lorsque vous répondez à tous pour un e-mail reçu. Par exemple, vous recevez un e-mail via un compte, mais toutes les adresses de messagerie de vos comptes Outlook apparaissent comme destinataires dans cet e-mail. Après avoir cliqué sur le bouton Répondre à tous, toutes les adresses de messagerie sont incluses dans les champs À, Cc ou Cci. Mais en réalité, vous ne souhaitez pas que vos autres comptes de messagerie reçoivent cet e-mail de réponse. Alors, comment se retirer de la réponse à tous ? Cet article vous recommandera des méthodes pour y parvenir.
Se retirer soi-même lors de l'envoi d'e-mails avec du code VBA
Un clic pour se retirer de la réponse à tous avec Kutools pour Outlook
Se retirer soi-même lors de l'envoi d'e-mails avec du code VBA
Vous pouvez ajouter les adresses de votre compte de messagerie dans votre Outlook au code VBA suivant pour éviter de vous envoyer des e-mails. Veuillez procéder comme suit.
1. Appuyez simultanément sur Alt + F11 pour ouvrir la fenêtre Microsoft Visual Basic for Applications.
2. Dans la fenêtre Microsoft Visual Basic for Applications, double-cliquez sur Projet1 > Objets Microsoft Outlook > ThisOutlookSession, puis copiez et collez le code VBA ci-dessous dans la fenêtre Code. Voir capture d'écran :
Code VBA : se retirer soi-même de tous les e-mails envoyés 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 Sub1. Veuillez modifier les adresses e-mail dans le code VBA pour qu'elles correspondent à vos comptes de messagerie.
2. Assurez-vous que l'option Activer toutes les macros est activée. Voir capture d'écran :
3. Cliquez sur le bouton Enregistrer et fermez la fenêtre Microsoft Visual Basic for Applications.
Dès maintenant, lorsque vous envoyez des e-mails, les adresses e-mail spécifiées de vos comptes Outlook seront automatiquement supprimées des champs À, Cc ou Cci.
Un clic pour se retirer de la réponse à tous avec Kutools pour Outlook
Si vous avez Kutools pour Outlook, vous pouvez retirer vos adresses des champs À, Cc et Cci lors de l'envoi d'e-mails en un seul clic.
Comme le montre la capture d'écran suivante, pour se retirer de la réponse à tous dans Outlook, veuillez procéder 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 > Supprimer mon nom. Voir capture d'écran :
Tous vos noms (adresses de compte de messagerie) sont immédiatement supprimés des champs À, Cc ou Cci.
Si vous souhaitez tester gratuitement cet utilitaire, veuillez d'abord télécharger gratuitement le logiciel, puis appliquer l'opération selon les étapes ci-dessus.
Meilleurs outils de productivité pour Office
Dernière nouvelle : Kutools pour Outlook lance sa version gratuite !
Découvrez le tout nouveau Kutools pour Outlook avec plus de100 fonctionnalités incroyables ! Cliquez pour télécharger dès maintenant !
📧 Automatisation des E-mails : Réponse automatique (disponible pour POP et IMAP) / Programmer l’envoi d’un e-mail / CC/BCC automatique par règle lors de l’envoi / Transfert automatique (règle avancée) / Ajouter automatiquement une salutation / Diviser automatiquement les e-mails multi-destinataires en messages individuels ...
📨 Gestion des E-mails : Rappeler lemail / Bloquer les e-mails frauduleux par objet et autres critères / Supprimer les doublons / Recherche Avancée / Organiser les dossiers ...
📁 Pièces jointes Pro : Enregistrement en lot / Détachement en lot / Compression en lot / Enregistrer automatiquement / Détachement automatique / Compression automatique ...
🌟 Interface magique : 😊Plus d’emojis élégants et amusants / Vous rappelle lorsque des e-mails importants arrivent / Réduire Outlook au lieu de fermer ...
👍 Fonctions en un clic : Répondre à tous avec pièces jointes / E-mails anti-phishing / 🕘Afficher le fuseau horaire de l’expéditeur ...
👩🏼🤝👩🏻 Contacts & Calendrier : Ajouter en lot des contacts à partir des e-mails sélectionnés / Diviser un groupe de contacts en groupes individuels / Supprimer le rappel d’anniversaire ...
Utilisez Kutools dans votre langue préférée – prend en charge l’Anglais, l’Espagnol, l’Allemand, le Français, le Chinois et plus de40 autres !
🚀 Téléchargement en un clic — Obtenez tous les compléments Office
Recommandé vivement : Kutools pour Office (5-en-1)
Un clic pour télécharger cinq installateurs en une seule fois — Kutools pour Excel, Outlook, Word, PowerPoint et Office Tab Pro. Cliquez pour télécharger dès maintenant !
- ✅ Praticité en un clic : téléchargez les cinq packages d’installation en une seule action.
- 🚀 Prêt pour toutes les tâches Office : installez les compléments dont vous avez besoin, quand vous en avez besoin.
- 🧰 Inclus : Kutools pour Excel / Kutools pour Outlook / Kutools pour Word / Office Tab Pro / Kutools pour PowerPoint