Contact group shortcut

Not open for further replies.


Senior Member
Outlook version
Email Account
Exchange Server
Hey all. i have a ton of outlook contacts that need to go into contact groups. Is there any kind of code to speed this up? In a perfect world I'd like to highlight, say, four contacts, run the code and voila - a contact group is created and they're all thrown in. Wishful thinking?

Thanks as always. You guys are saving lives here.


Senior Member
Outlook version
Email Account
Exchange Server
How about one that operates not with email messages but with contacts? For instance, if I highlight three contacts in my Contacts folder, and want to create a DL for them?

Diane Poremsky

Senior Member
Outlook version
Outlook 2016 32 bit
Email Account
Office 365 Exchange
I should have code somewhere that does that too - but it wouldn't be hard to re-write the code to do it.

Basically, you add the addresses to the to field of a new message then add the addresses to a group.
    Set newMail = oMail.Reply
    Set oRecipients = newMail.Recipients
            With oDLGroup
                .AddMembers oRecipients
' just save and close
                '.Close olSave
' if you want to see that the address was added to the DL
            End With
    newMail.Close olDiscard

if you are creating a new group, you don't need to do a lookup and select a group, just set the name of the oDLGroup.
Set oDLGroup = Application.CreateItem(olDistributionListItem)
oDLGroup.DLName = "Group name"
Not open for further replies.
Similar threads
Thread starter Title Forum Replies Date
S Outlook 365 Shared mailbox contact group member numbers not matching Using Outlook 0
D Contact Group - Adding Bulk Addresses Using Outlook 2
D Advanced e-Mail search on from/to contact group only searches for first 20 contacts in group Using Outlook 0
Diane Poremsky Add Email Addresses to a Contact Group Using Outlook 0
C in outlook 2007-Contact Group-One name have 3 mail id-its possible? Using Outlook 3
A Contact Group issues Outlook 2013 Using Outlook 1
E Outlook contact group lists corrupted Using Outlook 8
V Contact group: addresses in BCC? Using Outlook 2
S [outlook-users] Create contact group from other user's contacts Using Outlook 1
R Adding Second Business Contact Group BCM (Business Contact Manager) 1
M Accessing ALL Outlook contact fields Outlook VBA and Custom Forms 2
F Outlook 365 No scroll bars in Contact Using Outlook 2
N Contact Form Notes Field Touch vs Mouse Using Outlook 0
J "Contact" button in Journal entry Using Outlook 1
witzker How to find all emails from and to a contact in OL 2019 Using Outlook 6
G Send a greeting message to a contact on birthday Outlook VBA and Custom Forms 5
S CONTACT FIELD PRINT ORDER Outlook VBA and Custom Forms 1
I Button PDF in Outlook Contact custom form Outlook VBA and Custom Forms 1
O Outlook 365 - How to create / copy a new contact from an existing one? Using Outlook 5
N contact list seen in Contact folder but knot in Address book or when 'TO' button is clicked in new email Using Outlook 0
M Disable Contact Card Results when using "Search People" in Outlook Ribbon Using Outlook 7
M Contact suggestion Using Outlook 2
H Custom Outlook Contact Form VBA Outlook VBA and Custom Forms 1
witzker HowTo Change message Class of contact form Outlook VBA and Custom Forms 0
witzker Open Contact missing in Outlook 2019 Using Outlook 2
witzker HowTo start a macro with an Button in OL contact form Outlook VBA and Custom Forms 12
witzker Pls help to change the code for inserting date in Ol contact body Outlook VBA and Custom Forms 5
R Time for another article on contact cards? Using Outlook 0
O Create a custom contact form - questions before messing things up... Outlook VBA and Custom Forms 4
M vCard does not have user-defined fields from my custom contact form (365) Using Outlook 1
C Copy Outlook contact field value to another field Outlook VBA and Custom Forms 1
W Remove specific contacts from contact list Outlook VBA and Custom Forms 3
GregS 2016 Contact List being managed by Using Outlook 1
F Copy and replace not update contact in another pst Using Outlook 0
A Sending contact vcards sends older version instead of updated version Using Outlook 4
T Outlook 2010 Correct way to map multiple contact fields Using Outlook 4
Victor_50 Outlook 2013 Custom Contact Form starts with "E-mail 2" Outlook VBA and Custom Forms 2
B Outlook Business Contact Manager with SQL to Excel, User Defined Fields in BCM don't sync in SQL. Can I use VBA code to copy 1 field to another? BCM (Business Contact Manager) 0
L dynamic and static dates in Outlook contact "notes" ie. body Using Outlook 2
Randy Redekopp How To Merge Contact Info to Email Custom Form Template Using Outlook 2
L Wierd Office 365 Contact unable to edit body of random contacts Using Outlook 5
M Contact photos are distorted Using Outlook 0
C Outlook Contact Manager - A viable successor? BCM (Business Contact Manager) 7
N Contact display as Using Outlook 2
N contact notepad 'style' getting changed after clicking and running Activities Using Outlook 2
N How to turn off autocorrect in contact notepads Using Outlook 2
S Unable to Edit Contact Information in Certain Contact Folders Using Outlook 3
P Add a contact to the New Task in Outlook 2016 Using Outlook 2
P AGGGGHHHH!!!! - Address Books and Contact Subfolders Using Outlook 5
J Contact Business card view Using Outlook 11

Similar threads