Jak se odstranit z pole Komu/Kopie/Skrytá kopie, když odpovím všem v aplikaci Outlook?
Pokud je ve vašem Outlooku více e-mailových účtů, způsobí to nějaké problémy, když na přijatý e-mail odpovíte všem. Například obdržíte e-mail prostřednictvím jednoho účtu, ale všechny vaše adresy e-mailových účtů aplikace Outlook, které se v tomto e-mailu zobrazují jako příjemci, jsou po kliknutí na tlačítko Odpovědět všem zahrnuty všechny adresy e-mailových účtů do pole Komu, Kopie nebo Skrytá kopie. Ve skutečnosti ale nechcete, aby vám tento e-mail s odpovědí zasílal jiný e-mailový účet. Jak se ale odstranit z odpovědi na všechny? Tento článek vám doporučí metody, jak toho dosáhnout.
Při odesílání e-mailů s kódem VBA se odeberu
Jediným kliknutím se odeberu z odpovědi vše pomocí Kutools pro Outlook
Při odesílání e-mailů s kódem VBA se odeberu
Adresy e-mailových účtů v Outlooku můžete přidat do následujícího kódu VBA, abyste zabránili posílání e-mailů sami sobě. Postupujte prosím následovně.
1. lis Další + F11 současně otevřete Microsoft Visual Basic pro aplikace okno.
2. V Microsoft Visual Basic pro aplikace v okně poklepejte na ikonu Project1 > Objekty Microsoft Outlook > ThisOutlookSessiona poté zkopírujte a vložte pod kód VBA do okna Kód. Viz snímek obrazovky:
Kód VBA: odeberu se ze všech odesílaných e-mailů v aplikaci 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. Změňte prosím e-mailové adresy v kódu VBA na své e-mailové účty.
2. Ujistěte se, že je povolena možnost Povolit všechna makra. Viz snímek obrazovky:
3. Klepněte na tlačítko Uložit tlačítko a zavřete Microsoft Visual Basic pro aplikace okno.
Od nynějška budou při odesílání e-mailů automaticky odstraněny zadané e-mailové adresy vašich účtů aplikace Outlook z pole Komu, Kopie nebo Skrytá kopie.
Jediným kliknutím se odeberu z odpovědi vše pomocí Kutools pro Outlook
Pokud máte Kutools pro Outlook, můžete při odesílání e-mailů jedním kliknutím odstranit své adresy z polí Komu, Kopie a Skrytá kopie.
Jak je ukázáno na následujícím snímku obrazovky, pro odebrání se z odpovědi na vše v Outlooku postupujte následovně.
1. Po kliknutí na tlačítko Odpovědět všem a vytvořte e-mail s odpovědí, klikněte prosím Kutools > Mé jméno je. Viz snímek obrazovky:
Poté budou všechna vaše jména (adresy e-mailových účtů) okamžitě odstraněna z pole Komu, Kopie nebo Skrytá kopie.
Chcete-li mít bezplatnou zkušební verzi tohoto nástroje, přejděte na software si stáhněte zdarma nejprve a poté přejděte k použití operace podle výše uvedených kroků.
Nejlepší nástroje pro produktivitu v kanceláři
Nejnovější zprávy: Spuštění Kutools pro Outlook Volná verze!
Vyzkoušejte zcela nové Kutools pro Outlook ZDARMA verze s více než 70 neuvěřitelnými funkcemi, kterou můžete používat NAVŽDY! Kliknutím stáhnete hned!
???? Automatizace e-mailu: Automatická odpověď (k dispozici pro POP a IMAP) / Naplánujte odesílání e-mailů / Automatická kopie/skrytá kopie podle pravidel při odesílání e-mailu / Automatické přeposílání (pokročilá pravidla) / Automatické přidání pozdravu / Automaticky rozdělte e-maily pro více příjemců na jednotlivé zprávy ...
📨 Email management: Připomenout e-maily / Blokujte podvodné e-maily podle předmětů a dalších / Odstranit duplicitní e-maily / pokročilé vyhledávání / Konsolidovat složky ...
📁 Přílohy Pro: Dávkové uložení / Dávkové odpojení / Dávková komprese / Automaticky uložit / Automatické odpojení / Automatické komprimování ...
???? Rozhraní Magic: 😊 Více pěkných a skvělých emotikonů / Připomeňte si, když přijdou důležité e-maily / Minimalizujte aplikaci Outlook namísto zavírání ...
???? Zázraky na jedno kliknutí: Odpovědět všem s příchozími přílohami / E-maily proti phishingu / 🕘Zobrazit časové pásmo odesílatele ...
👩🏼🤝👩🏻 Kontakty a kalendář: Dávkové přidání kontaktů z vybraných e-mailů / Rozdělit skupinu kontaktů na jednotlivé skupiny / Odeberte připomenutí narozenin ...
