Come faccio a rimuovermi automaticamente dai campi A, CC e CCN quando rispondo a tutti in Outlook?

Se sono presenti più account email nel Suo Outlook, ciò potrebbe causare alcuni problemi quando risponde a tutti a un'email ricevuta. Ad esempio, riceve un'email tramite un account, ma tutti gli indirizzi dei Suoi account Outlook vengono visualizzati come destinatari in tale email; dopo aver fatto clic sul pulsante Rispondi a tutti, tutti gli indirizzi degli account email compaiono nei campi A, Cc o Ccn. In realtà, però, non desidera che gli altri Suoi account email ricevano questa risposta. Ma come rimuovere me stesso dalla risposta a tutti? Questo articolo Le proporrà alcuni metodi per ottenere questo risultato.

Rimuovi me stesso durante l'invio di email con codice VBA

Un clic per rimuovere me stesso dalla risposta a tutti con Kutools per Outlook

---

Rimuovi me stesso durante l'invio di email con codice VBA

È possibile aggiungere gli indirizzi dei Suoi account email nel codice VBA seguente per evitare di inviare messaggi a se stessi. Proceda come indicato.

1. Premere contemporaneamente i tasti Alt+F11 per aprire la finestra di Microsoft Visual Basic for Applications.

2. Nella finestra di Microsoft Visual Basic for Applications, fai doppio clic su Project1 > Oggetti Microsoft Outlook > ThisOutlookSession, quindi copia e incolla il codice VBA riportato di seguito nella finestra del codice. Guarda lo screenshot:

Codice VBA: rimuove automaticamente me stesso da tutte le email inviate 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 Sub

3. Fare clic sul pulsante Salva e chiudere la finestra di Microsoft Visual Basic for Applications.

D'ora in poi, quando invierà email, gli indirizzi email specificati nei Suoi account Outlook verranno rimossi automaticamente dai campi A, Cc o Ccn.

---

Un clic per rimuovere me stesso dalla risposta a tutti con Kutools per Outlook

Con Kutools per Outlook, può rimuovere i Suoi indirizzi dai campi A, Cc e Ccn al momento dell'invio delle email con un solo clic.

Come illustrato nello screenshot seguente, per rimuovere te stesso dalla risposta a tutti in Outlook, procedi come indicato.

1. Dopo aver fatto clic sul pulsante Rispondi a tutti per creare una risposta, fai clic su Kutools > I miei nomi. Vedere lo screenshot:

Tutti i Suoi indirizzi email verranno immediatamente rimossi dai campi A, Cc o Ccn.

Se desideri provare gratuitamente questa utility, accedi innanzitutto alla pagina per scaricare gratuitamente il software, quindi segui la procedura indicata nei passaggi sopra.