Cum să mă elimin din răspunsul din Outlook?

Dacă există mai multe conturi de e-mail în Outlook, aceasta va cauza unele probleme atunci când răspundeți la un e-mail primit. De exemplu, primiți un e-mail printr-un singur cont, dar toate adresele de cont de e-mail Outlook afișate ca destinatari în acest e-mail, după ce faceți clic pe butonul Răspundeți tuturor, toate adresele de cont de e-mail sunt incluse în caseta Către, Cc sau Cco. Dar, de fapt, nu doriți ca alte conturi de e-mail ale dvs. să primească acest e-mail de răspuns. Dar cum să mă elimin de la toate răspunsurile? Acest articol vă va recomanda metode de realizare.

Eliminați-mă când trimit e-mailuri cu cod VBA
Un singur clic pentru a mă elimina din răspunsul tuturor cu Kutools pentru Outlook

Eliminați-mă când trimit e-mailuri cu cod VBA

Puteți adăuga adresele contului dvs. de e-mail în Outlook în următorul cod VBA pentru a preveni trimiterea de e-mailuri către dvs. Vă rugăm să faceți următoarele.

1. presa Alt + F11 tastele simultan pentru a deschide Microsoft Visual Basic pentru aplicații fereastră.

2. În Microsoft Visual Basic pentru aplicații fereastră, faceți dublu clic pe Project1 > Obiecte Microsoft Outlook > Această sesiune Outlook, apoi copiați și lipiți sub codul VBA în fereastra Cod. Vedeți captura de ecran:

Cod VBA: eliminați-mă de toate trimiterile de e-mailuri în 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

notițe:

1. Vă rugăm să schimbați adresele de e-mail din codul VBA în conturile dvs. de e-mail.

2. Asigurați-vă că este activată opțiunea Activare toate macrocomenzile. Vedeți captura de ecran:

3. Faceți clic pe Economisiți și închideți butonul Microsoft Visual Basic pentru aplicații fereastră.

De acum înainte, când trimiteți e-mailuri, adresele de e-mail specificate ale conturilor dvs. Outlook vor fi eliminate automat din caseta Către, Cc sau Cco.

Un singur clic pentru a mă elimina din răspunsul tuturor cu Kutools pentru Outlook

După cum se arată în următoarea captură de ecran, pentru a mă elimina din răspunsul din Outlook, procedați după cum urmează.

1. După ce faceți clic pe butonul Răspuns tuturor pentru a crea un e-mail de răspuns, faceți clic pe Kutools > Numele meu este. Vedeți captura de ecran:

Apoi toate numele dvs. (adresele contului de e-mail) sunt eliminate imediat din caseta Către, Cc sau Cco.

Dacă doriți să aveți o încercare gratuită a acestui utilitar, vă rugăm să accesați descărcați gratuit software-ul mai întâi, apoi mergeți pentru a aplica operația conform pașilor de mai sus.