How to sort and group by sender domain in Outlook?
Normally, we can easily arrange all email messages by sender, categories, subjects, size, etc. in Microsoft Outlook. However, it seems impossible to sort or group email messages by sender domains, because there is no Sender domain field for email messages at all. Here I will introduce a VBA code to help you add a Domain column for email messages, then sort and group the email messages by the sender domains easily in Outlook.
- Automate emailing with Auto CC/BCC, Auto Forward by rules; send Auto Reply (Out of Office) without requiring an exchange server...
- Get reminders like BCC Warning when replying to all while you're in the BCC list, and Remind When Missing Attachments for forgotten attachments...
- Improve email efficiency with Reply (All) With Attachments, Auto Add Greeting or Date & Time into Signature or Subject, Reply Multiple Emails...
- Streamline emailing with Recall Emails, Attachment Tools (Compress All, Auto Save All...), Remove Duplicates, and Quick Report...
To sort and group email messages by sender domains in Microsoft Outlook 2013 and 2010, please do as following:
Step 1: Open the mail folder where you will sort all email messages by sender domains.
Step 2: Turn off the Reading Pane with clicking the Reading Pane > Off on the View tab.
Step 3: Go ahead and click the Add Columns on the View tab.
Step 3: In the Show Columns dialog box, click the New Column button.
Step 4: In the New Column dialog box, type the Domain in the Name box, and keep the Text selected in the both Type box and Format box, at last click the OK button.
Step 5: Now you get back to the Show Columns dialog box, select the Domain in the Show these columns in this order box, move it below From item, and click the OK button.
Step 6: Now you go back to the opening mail folder, select all email messages with pressing the Ctrl + A keys at the same time.
Step 7: Press the Alt + F11 keys in a meanwhile to open the Microsoft Visual Basic for Applications window; then click the Insert > Module, next paste the following VBA code into the module.
VBA: Sort and Group by sender domain
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
Step 8: Run this VBA code with pressing the F5 key or Run button in the Toolbar.
Step 9: Now each sender’s domain is extracted and filled into the Domain column.
A. To sort the email messages by sender domains, just click the Column header of Domain at the top of all email messages;
B. To group the email messages by sender domains, just right click the Column header of Domain, and select the Group By This Field from the drop down list. See screen shot below:
Notes:
(1) This VBA code works well in Outlook 2013 and 2010, but doesn’t work in Outlook 2007.
(2) You can save the custom view easily with How to save and copy view settings to other folders in Outlook?
Related Article
How to view senders’ domain in mail list in Outlook?
Best Office Productivity Tools
Kutools for Outlook - Over 100 Powerful Features to Supercharge Your Outlook
🤖 AI Mail Assistant: Instant pro emails with AI magic--one-click to genius replies, perfect tone, multilingual mastery. Transform emailing effortlessly! ...
📧 Email Automation: Out of Office (Available for POP and IMAP) / Schedule Send Emails / Auto CC/BCC by Rules When Sending Email / Auto Forward (Advanced Rules) / Auto Add Greeting / Automatically Split Multi-Recipient Emails into Individual Messages ...
📨 Email Management: Easily Recall Emails / Block Scam Emails by Subjects and Others / Delete Duplicate Emails / Advanced Search / Consolidate Folders ...
📁 Attachments Pro: Batch Save / Batch Detach / Batch Compress / Auto Save / Auto Detach / Auto Compress ...
🌟 Interface Magic: 😊More Pretty and Cool Emojis / Boost Your Outlook Productivity with Tabbed Views / Minimize Outlook Instead of Closing ...
👍 One-click Wonders: Reply All with Incoming Attachments / Anti-Phishing Emails / 🕘Show Sender's Time Zone ...
👩🏼🤝👩🏻 Contacts & Calendar: Batch Add Contacts From Selected Emails / Split a Contact Group to Individual Groups / Remove Birthday Reminders ...
Over 100 Features Await Your Exploration! Click Here to Discover More.