Come ordinare e raggruppare per dominio del mittente in Outlook?

Normalmente, possiamo facilmente organizzare tutte le email per mittente, categorie, oggetto, dimensione, ecc. in Microsoft Outlook. Tuttavia, sembra impossibile ordinare o raggruppare le email per domini dei mittenti, poiché non esiste alcun campo Dominio del mittente per le email. Qui vi presenterò un codice VBA per aiutarvi ad aggiungere una colonna Dominio alle email, quindi potrete ordinare e raggruppare facilmente le email per domini dei mittenti in Outlook.

Per ordinare e raggruppare le email per domini dei mittenti in Microsoft Outlook 2013 e 2010, procedete come segue:

Passo 1: Aprite la cartella di posta dove desiderate ordinare tutte le email per domini dei mittenti.

Passo 2: Disattivate il Riquadro di lettura facendo clic su Riquadro di lettura > Off nella scheda Visualizza.

Passo 3: Procedete e fate clic su Aggiungi colonne nella scheda Visualizza.

Passo 3: Nella finestra di dialogo Mostra colonne, fate clic sul pulsante Nuova colonna.

Passo 4: Nella finestra di dialogo Nuova colonna, digitate Dominio nella casella Nome e mantenete selezionato Testo in entrambe le caselle Tipo e Formato, infine fate clic sul pulsante OK.

Passo 5: Ora siete tornati alla finestra di dialogo Mostra colonne, selezionate Dominio nella casella Mostra queste colonne in questo ordine, spostatelo sotto l'elemento Da e fate clic sul pulsante OK.

Passo 6: Ora siete tornati alla cartella di posta aperta, selezionate tutte le email premendo contemporaneamente i tasti Ctrl + A.

Passo 7: Premete contemporaneamente i tasti Alt + F11 per aprire la finestra di Microsoft Visual Basic for Applications; quindi fate clic su Inserisci > Modulo, poi incollate il seguente codice VBA nel modulo.

VBA: Ordina e raggruppa per dominio del mittente

Sub ListSelectionDomain()
Dim aObj As Object
Dim oProp As Outlook.UserProperty
Dim sDomain
On Error Resume Next
For Each aObj In Application.ActiveExplorer.Selection
Set oMail = aObj
sDomain = Right(oMail.SenderEmailAddress, Len(oMail.SenderEmailAddress) - InStr(1, oMail.SenderEmailAddress, "@"))
Set oProp = oMail.UserProperties.Add("Domain", olText, True)
oProp.Value = sDomain
oMail.Save
Err.Clear
Next
End Sub

Passo 8: Eseguite questo codice VBA premendo il tasto F5 o il pulsante Esegui nella barra degli strumenti fluttuante.

Passo 9: Ora ogni dominio del mittente viene estratto e inserito nella colonna Dominio.

A. Per ordinare le email per domini dei mittenti, basta fare clic sull'intestazione della colonna Dominio in cima a tutte le email;

B. Per raggruppare le email per domini dei mittenti, basta fare clic con il tasto destro sull'intestazione della colonna Dominio e selezionare Raggruppa per questo campo dall'elenco a discesa. Vedere lo screenshot qui sotto:

Note:

(1) Questo codice VBA funziona bene in Outlook 2013 e 2010, ma non funziona in Outlook 2007.
(2) Potete salvare facilmente la vista personalizzata con Come salvare e copiare le impostazioni della vista in altre cartelle in Outlook?

Articolo correlato

Come visualizzare i domini dei mittenti nell'elenco delle email in Outlook?

---

I migliori strumenti per la produttività in Office

Ultime novità: Kutools per Outlook lancia la versione gratuita!

Scopri la nuovissima versione GRATUITA di Kutools per Outlook con oltre70 funzionalità straordinarie, da utilizzare PER SEMPRE! Clicca per scaricarla subito!

🤖 Kutools AI : Sfrutta una tecnologia AI avanzata per gestire le email senza sforzo, tra cui rispondere, riassumere, ottimizzare, estendere, tradurre e scrivere email.

📧 Automazione Email: Risposta automatica (disponibile per POP e IMAP) / Programma invio email / CC/BCC automatico tramite regola durante l'invio / Inoltro automatico (Regola avanzata) / Aggiungi saluto automaticamente / Suddividi automaticamente le email con più destinatari in messaggi individuali...

📨 Gestione Email: Richiama Email / Blocca email di phishing per oggetto e altri criteri / Elimina email duplicate / Ricerca Avanzata / Organizza cartelle...

📁 Allegati Pro: Salva in blocco / Distacca in blocco / Comprimi in blocco / Salvataggio automatico / Distacca automaticamente / Auto Comprimi...

🌟 Magia dell'interfaccia: 😊Più emoji belle e originali / Notifiche per email importanti / Riduci Outlook a icona invece di chiuderlo...

👍 Funzioni rapide: Rispondi a Tutti con Allegati / Email anti-phishing / 🕘Mostra il fuso orario del mittente...

👩🏼‍🤝‍👩🏻 Contatti & Calendario: Aggiungi in blocco contatti dalle email selezionate / Dividi un gruppo di contatti in gruppi individuali / Rimuovi promemoria di compleanno...

Sblocca subito Kutools per Outlook con un solo clic. Non aspettare, scaricalo ora e aumenta la tua efficienza!

Elenco delle funzionalità di Kutools per Outlook Scarica la versione gratuita Passa alla versione Professional