Hoe kan ik mezelf verwijderen uit het Aan/CC/BCC-veld bij 'Allen beantwoorden' in Outlook?
Als je meerdere e-mailaccounts hebt in je Outlook, kan dit problemen veroorzaken wanneer je op 'Allen beantwoorden' klikt voor een ontvangen e-mail. Bijvoorbeeld, je ontvangt een e-mail via één account, maar alle e-mailadressen van je Outlook-accounts worden weergegeven als ontvangers in deze e-mail. Nadat je op de knop 'Allen beantwoorden' klikt, worden alle e-mailadressen opgenomen in het Aan-, Cc- of Bcc-veld. Maar eigenlijk wil je niet dat andere e-mailaccounts van jezelf deze antwoord-e-mail ontvangen. Hoe verwijder je jezelf dan uit 'Allen beantwoorden'? Dit artikel biedt methoden om dit te bereiken.
Verwijder jezelf bij het versturen van e-mails met VBA-code
Eén klik om jezelf te verwijderen uit 'Allen beantwoorden' met Kutools voor Outlook
Verwijder jezelf bij het versturen van e-mails met VBA-code
Je kunt je e-mailaccountadressen binnen je Outlook toevoegen aan de volgende VBA-code om te voorkomen dat je e-mails naar jezelf stuurt. Volg de onderstaande stappen.
1. Druk gelijktijdig op Alt + F11 om het Microsoft Visual Basic for Applications-venster te openen.
2. Dubbelklik in het Microsoft Visual Basic for Applications-venster op Project1 > Microsoft Outlook Objects > ThisOutlookSession, en kopieer en plak vervolgens de onderstaande VBA-code in het Code-venster. Zie screenshot:
VBA-code: verwijder jezelf uit alle verzendende e-mails in 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. Wijzig de e-mailadressen in de VBA-code naar je e-mailaccounts.
2. Zorg ervoor dat de optie 'Enable all macros' is ingeschakeld. Zie screenshot:
3. Klik op de knop Opslaan en sluit het Microsoft Visual Basic for Applications-venster.
Vanaf nu, wanneer je e-mails verstuurt, worden de gespecificeerde e-mailadressen van je Outlook-accounts automatisch verwijderd uit het Aan-, Cc- of Bcc-veld.
Eén klik om jezelf te verwijderen uit 'Allen beantwoorden' met Kutools voor Outlook
Als je Kutools voor Outlook hebt, kun je je adressen met één klik verwijderen uit de Aan-, Cc- en Bcc-velden bij het versturen van e-mails.
Zoals in de volgende screenshot te zien is, om jezelf te verwijderen uit 'Allen beantwoorden' in Outlook, volg dan de volgende stappen.
1. Na het klikken op de knop 'Allen beantwoorden' om een antwoord-e-mail te maken, klik dan op Kutools > Mijn Namen. Zie screenshot:
Al je namen (e-mailaccountadressen) worden onmiddellijk verwijderd uit het Aan-, Cc- of Bcc-veld.
Als je een gratis proefversie van dit hulpprogramma wilt, ga dan eerst naar de website om de software gratis te downloaden, en pas daarna de bewerking toe volgens de hierboven beschreven stappen.
Beste Office-productiviteitstools
Breaking News: Kutools for Outlook lanceert een gratis versie!
Ervaar de geheel nieuwe Kutools for Outlook met meer dan100 fantastische functies! Klik om nu te downloaden!
📧 E-mailautomatisering: Automatisch antwoorden (Beschikbaar voor POP en IMAP) / Schema E-mail verzenden / Automatisch CC/BCC per Regel bij Verzenden / Automatisch doorsturen (Geavanceerde regels) / Begroeting automatisch toevoegen / Meerdere ontvangers automatisch opsplitsen naar individuele E-mail...
📨 E-mailbeheer: E-mail terughalen / Scam-e-mails blokkeren op onderwerp en anderen / Duplicaat verwijderen / Geavanceerd Zoeken / Organiseer mappen...
📁 Bijlagen Pro: Batch opslaan / Batch loskoppelen / Batch comprimeren / Automatisch opslaan / Automatisch loskoppelen / Automatisch comprimeren...
🌟 Interface-magie: 😊Meer mooie en gave emoji's / Herinneren wanneer belangrijke e-mails binnenkomen / Outlook minimaliseren in plaats van afsluiten...
👍 Wonders met één klik: Antwoord Allen met Bijlagen / Anti-phishing e-mails / 🕘Tijdzone van de afzender weergeven...
👩🏼🤝👩🏻 Contacten & Agenda: Batch toevoegen van contacten vanuit geselecteerde E-mails / Contactgroep opsplitsen naar individuele groepen / Verjaardagsherinnering verwijderen...
Gebruik Kutools in je voorkeurt taal – ondersteunt Engels, Spaans, Duits, Frans, Chinees en meer dan40 andere talen!
🚀 Eén klik downloaden — Ontvang alle Office-invoegtoepassingen
Sterk aanbevolen: Kutools for Office (5-in-1)
Met één klik download je vijf installatiepakketten tegelijk — Kutools voor Excel, Outlook, Word, PowerPoint en Office Tab Pro. Klik om nu te downloaden!
- ✅ Eén-klik gemak: Download alle vijf de installaties in één actie.
- 🚀 Klaar voor elke Office-taak: Installeer de invoegtoepassingen die je nodig hebt, wanneer je ze nodig hebt.
- 🧰 Inclusief: Kutools voor Excel / Kutools for Outlook / Kutools voor Word / Office Tab Pro / Kutools voor PowerPoint