Přejít k hlavnímu obsahu

Jak se odstranit z odpovědi na vše 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 ""
	RemoveAddrList.Add ""
	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

Poznámky:

1. 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

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

Kutools pro aplikaci Outlook - Více než 100 výkonných funkcí, které doplní váš Outlook

???? Automatizace e-mailu: Mimo kancelář (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: Snadné vyvolání e-mailů  /  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 ProDá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ů   /  Zvyšte produktivitu své aplikace Outlook pomocí zobrazení s kartami  /  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 ...

Přes 100 Vlastnosti Očekávejte svůj průzkum! Kliknutím sem zobrazíte další informace.

Více       Stažení zdarma      Nákup
 

 

Comments (0)
No ratings yet. Be the first to rate!
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations