VBA script to allow mail merges of distribution groups?

Status
Not open for further replies.

mr_malkovich

Senior Member
Outlook version
Outlook 2007
Email Account
Exchange Server
Hey all. Is there a code that will allow me to mail merge distribution groups? So for instance if I mail merged 20 distribution groups, I'd end up with 20 emails in my outbox, and each would be going to the email addresses assigned to their groups?

Thanks as always..
 

Diane Poremsky

Senior Member
Outlook version
Outlook 2016 32 bit
Email Account
Office 365 Exchange
i don't have any code that does that but i have code that will mail merge to members of a DL - one address per message.

http://www.slipstick.com/developer/mail-merge-members-contact-group/ has normal mail merge behavior of individual messages but uses the members of a contact group (dl) as the source.

Outlook can resolve the group names, so I'd make a text list of the group names and use it as the address source. You need to make sure the names are unique so outlook doesn't resolve them to the wrong person or group.
 

Diane Poremsky

Senior Member
Outlook version
Outlook 2016 32 bit
Email Account
Office 365 Exchange
Well, my initial thought when you first asked was no, but upon further reflection, I think so. I think you'd want to use an outlook form, not a traditional mail merge in word, and copy it using VBA as you send it to each group. Deciding how to pick up the group names would be the hardest part - do you select them in contacts and run the macro, add them to the message you are using as the merge message then break the recipients list up for each message, pick from a list...
 

mr_malkovich

Senior Member
Outlook version
Outlook 2007
Email Account
Exchange Server
I like to think I'm good with Outlook, but I understood about 3% of that. When you say use an Outlook form, do you mean a contact form?
Could some kind of app be designed to make this a smooth process? Every day I email a couple of hundred people using mail merge. Some of them need to receive the email individually, and others need to receive it along with a couple other members of their organization. Currently I stop them all in the outbox and go in and manually delete all but one of the emails that are headed to individual members of one company, then manually add their email addresses to the To section of the remaining email then send them all off when I've gone through the whole outbox. Painful.
 

Diane Poremsky

Senior Member
Outlook version
Outlook 2016 32 bit
Email Account
Office 365 Exchange
Sorry about that, I meant outlook mail message. Create the message, add all DLs to the To field then run the macro to copy the message and send it to each group individually.
 

Diane Poremsky

Senior Member
Outlook version
Outlook 2016 32 bit
Email Account
Office 365 Exchange
To use, create a message, enter the Contact groups (or contacts) in the To field then run the macro. Close the original message. put it in thisoutlooksession and add a button to the qat.

http://www.slipstick.com/developer/how-to-use-outlooks-vba-editor/

Code:
Sub MailMergeDL() 
Dim objApp As Outlook.Application 
Dim objItem As Outlook.MailItem 
Dim objMsg As Outlook.MailItem 
Dim objOutlookRecip As Recipient 
Dim Recipients As Recipients 
 
Dim i As Integer 
 
Set objApp = Application 
Set objItem = objApp.ActiveInspector.CurrentItem 
 
If objItem.Recipients.Count > 0 Then
  For i = 1 To objItem.Recipients.Count 
  
   Set objMsg = objApp.CreateItem(olMailItem) 
  
   With objMsg 
     .HTMLBody = objItem.HTMLBody 
     .Subject = objItem.Subject 
     .Recipients.Add objItem.Recipients(i) 
    End With 
  
   For Each objOutlookRecip In objMsg.Recipients 
        objOutlookRecip.Resolve 
    Next 
  
   objMsg.Display ' use Send to send automatically
   Next i 
 
End If 
' close the merge message without saving 
objItem.Close olDiscard 'use olSave to save it as a draft 
 
Set objItem = Nothing 
Set objApp = Nothing 
 
End Sub
 

mr_malkovich

Senior Member
Outlook version
Outlook 2007
Email Account
Exchange Server
Wow. Interesting. Going to carve some time to get to grips with this and get back to you. Thanks as always, Diane.
 
Status
Not open for further replies.
Thread starter Similar threads Forum Replies Date
D.Moore VBA script fail after Office 365 update Using Outlook 8
S Change VBA script to send HTML email instead of text Outlook VBA and Custom Forms 3
dweller Outlook 2010 Rule Ignores VBA Script Outlook VBA and Custom Forms 2
N VBA Script to Open highlighted e-mail and Edit Message Outlook VBA and Custom Forms 5
K Outlook Archive to PST Files by Date Range VBA Script? Outlook VBA and Custom Forms 1
Peter H Williams Enable script containing VBA Outlook VBA and Custom Forms 12
R VBA Script Quick Parts Using Outlook 1
Q VBA Script to move item in secondary mailbox Outlook VBA and Custom Forms 2
N VBA Script to Send Automatic Emails from Outlook 2010 Outlook VBA and Custom Forms 1
O modify vba to run it as script rule Outlook VBA and Custom Forms 8
P How many subs can run in one outlook VBA script Using Outlook 5
J Email Parsing VBA Script for Outlook - NEEDED Outlook VBA and Custom Forms 7
P Vba script including macro appears in rules but wont run Outlook VBA and Custom Forms 6
R Adding vba to script list Outlook VBA and Custom Forms 4
F VBA script to highlight specific words Outlook VBA and Custom Forms 1
D VBA Script to extract text matching specific criteria Outlook VBA and Custom Forms 1
D VBA Script (Ask to where to save send mail) Outlook VBA and Custom Forms 1
D VBA script to auto download attachments and rename file according to subject line Outlook VBA and Custom Forms 23
Hudas Outlook VBA script reverting back to previous changes Outlook VBA and Custom Forms 2
J Outlook 2007 Rules & VBA: How to run a script on a report message (ReportItem) Using Outlook 14
V "Accept + Send the Response now", VBA script? Using Outlook 1
R Addins4Outlook TagIt! addin script or VBA module? Using Outlook 2
S Outlook VBA rule script to process both MailItem and MeetingItem Using Outlook 0
A VBA Script to Forward Spam to AntiSpam Provider Using "Blank" Form Outlook VBA and Custom Forms 2
L Limit VBA Script to one Outlook account Using Outlook 1
R Limiting length of saved attachment in VBA Outlook VBA and Custom Forms 2
S Skype for business meeting vba code Outlook VBA and Custom Forms 1
C How to use VBA to show only items x days old or more Outlook VBA and Custom Forms 1
B VBA to convert email to task, insert text of email in task notes, and attach copy of original email Outlook VBA and Custom Forms 4
D Outlook VBA error extracting property data from GetRules collection Outlook VBA and Custom Forms 10
S Reference Custom Fields with VBA Outlook VBA and Custom Forms 2
PGSystemTester VBA To Change AppointmentItem.BusyStatus From MeetingItem Before Send Using Outlook 0
A VBA macro for 15 second loop in send and received just for 1 specific mailbox Outlook VBA and Custom Forms 1
O Email not leaving Outbox when using Excel VBA to sync Outlook account Outlook VBA and Custom Forms 4
G VBA Macro Calendar Printing Assistant 3
R Help Revising VBA macro to delete email over different time span Outlook VBA and Custom Forms 0
B VBA to Collapse Task Folder Groups Outlook VBA and Custom Forms 1
R Expand VBA Permanent Delete Code Outlook VBA and Custom Forms 6
shrydvd vba to secure zip attachments Outlook VBA and Custom Forms 3
M Adding Subject to this Link-Saving VBA Outlook VBA and Custom Forms 4
N VBA to delete duplicates by message-id on common pst for 2 or more emails Outlook VBA and Custom Forms 0
M VBA to auto forward message with new subject and body text Outlook VBA and Custom Forms 8
A Custom VBA to sort emails into folders Outlook VBA and Custom Forms 0
L Moving emails with similar subject and find the timings between the emails using outlook VBA macro Outlook VBA and Custom Forms 1
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
R VBA for copying sent email to current folder under a shared mailbox Outlook VBA and Custom Forms 17
A Edit subject - and change conversationTopic - using VBA and redemption Outlook VBA and Custom Forms 2
N How can I increase/faster outlook VBA Macro Speed ? Using Outlook 2
N Outlook Email Rule execution through shortcut keys (VBA codes) Using Outlook 1
A VBA Code in Outlook disappears after first use Outlook VBA and Custom Forms 1
Similar threads


















































Top