Help with Outlook 2007 Macro Please!

Not open for further replies.


Outlook version
Email Account

Can someone please help me with the following:

We have a restaurant with about 500 clients on our email list.

Every now and then we send *.jpeg* adverts for specials, functions etc...

Recently all ISP's here in SA have a limit of 20 email contacts per email ( for Anti SPAM purposes ). However they offer to create a distribution

list for you - at an extra cost and a great inconvenience ( with all the paperwork required ) for small users like us,

and if you need to change addresses you need to send them updated info that they will change in 48 hours....... and and and........

I would like to create, if possible, a Macro in Outlook that would:

1) Create Email

2) Insert Recipient ( 1 email per each and every contact from a distribution list either created in Outlook, Excel or Access )

3) Insert user determined Subject - This might be July Lunch Specials, Themed evening on the 20th... etc

4) Insert a *.jpeg* in the body of the HTML email ( NOT as an attachment )

5) Send! ( with Delivery and Read Receipt )

I would really appreciate if someone could help me with the above

Thanking you in advance

Hi Diane

Thank you very much for replying.

Your idea for a Template is perfect for me.

So what I would like to do is physically create a new mail, type in the subject and insert the advert in the body of the email

Then I would need a Macro to send this mail individually to a distribution list in Outlook that I will have open

Could you please send me a code for this. I have never worked with VBA / Macro before and am learning.

Thank you once again for your great help!


Try creating a message and saving it as a template - then use this macro. You can use the subject field in the template or add the subject in the macro -

Sub Merge_to_Group() 
Dim o_list As Object 
Dim objMsg As MailItem 
' select or open the distribution list 
' you need the GetCurrentItem function from 
Set o_list = GetCurrentItem() 
For i = 1 To o_list.MemberCount 
Set objMsg = Application.CreateItemFromTemplate("C:\path\to\test-rule.oft") 
With objMsg
 .To = o_list.GetMember(i).Address
 .Subject = "Test Subject" 
'  use .display for testing 
' .send to send the messages automatically
End With 
Set objMsg = Nothing
End Sub
Hi Diane

thanks very much for your help

it works like a charm!

i introduced a time loop to delay msg sending

by 5 sec intervals

its working really well!

only prob is it comes up as spam :(

even from my own email address..

there's always something wrong

anyways thanks again!

Not open for further replies.
Similar threads
Thread starter Title Forum Replies Date
A Arthur needs help with 2007 Outlook e-mail Using accounts in Outlook 3
J IPAD Outlook OWA App - Help using Exchange 2007 Using Outlook 4
D Outlook 2007 not working>> Please help tried everything Using Outlook 3
U Need a help please Outlook 2007 crashing Using Outlook 2
P help me plase !!! outlook 2007 I can see mail Bcc Using Outlook 1
Z Need Help Outlook 2007 inbox and address book view Using Outlook 2
L Help for writing an Outlook 2007 macro Outlook VBA and Custom Forms 7
T need help w/ sending an e-mail -- outlook 2007 addin Outlook VBA and Custom Forms 2
Nufc1980 Outlook "Please treat this as private label" auto added to some emails - Help. Using Outlook 4
S Outlook 2002- "Send" button has disappeared. Help please. Using Outlook 1
X Open Hyperlinks in an Outlook Email Message (Help with Diane's solution) Outlook VBA and Custom Forms 3
B Seeking help with Outlook rule Using Outlook 2
I Outlook for Mac 2019 using on desktop and laptop IMAP on both need help with folders Using Outlook 1
e_a_g_l_e_p_i Outlook 2010 Help setting up Gmail account in Outlook 2010 Using Outlook 3
F Microsoft Outlook Connector 14.0.6123.5001 - Help! Using Outlook 6
R seperate read layout to design in outlook 2016..Help!! Outlook VBA and Custom Forms 3
Marc2019 Need help please! Cannot Setup my outlook email account on my Mac Outlook 2011 Using accounts in Outlook 2
C need help setting up outlook first time Using Outlook 1
S help with outlook scripting Outlook VBA and Custom Forms 4
J Help Please!!! Outlook 2016 - VBA Macro for replying with attachment in meeting invite Outlook VBA and Custom Forms 9
N Outlook Forms Help Outlook VBA and Custom Forms 2
K Help.... Office Outlook 2016 Using Outlook 1
E Outlook 2010 need help with rules Using Outlook 0
Jeff Davis Help fix my Outlook 2013? Using Outlook 28
C Newbie needs help with Outlook Macro Outlook VBA and Custom Forms 3
L Outlook 2002: HTML Emails Will Not Print: Please Help Using Outlook 0
A newb outlook macro help Outlook VBA and Custom Forms 1
joflo copy contents from outlook to excell - please help. Using Outlook 4
P Outlook 2010: Missing tab - "Format/Picture Tools" HELP! Using Outlook 3
E Outlook Contacts Help Using Outlook 1
M Outlook Backup help needed ASAP Using Outlook 2
C Please Help outlook 2013 Using Outlook 1
G Need help configuring a PRF for Outlook 2010 and 2013 Using Outlook 0
E Outlook Tasks Help Using Outlook 6
F Outlook 2010 - Need help with a custom field. Using Outlook 3
M HELP--Extract Data from 2003 outlook transfer to excel spreadsheet Using Outlook 1
R Need help getting BCM to work with my Outlook 2014 Using Outlook 4
K Help Needed - setting up Email in Outlook 2013 Using Outlook 3
M First post -help with managing two calendars Outlook 2010 /Exchange 2010 Using Outlook 0
R [VBA] complicated(?) outlook events - need help with code Using Outlook 15
C Outlook Profile Corrupt...Help!!!!! Using Outlook 0
M HELP! MSN to Outlook Using Outlook 1
A Outlook HELP Using Outlook 1
P Need help/Gmail accounts show separately/Outlook 2013 Using Outlook 0
A Need Help with BCM2010 Sharing on outlook 2013 Scenario! BCM (Business Contact Manager) 1
S Desperate for Help with Outlook custom form Using Outlook 0
L Outlook 2013 IMAP account is deleting e-mails from my inbox - help!!! Using Outlook 3
J Outlook 2010 Forms Help Needed "A field in this form requires a value." Using Outlook 6
W I Need help with and outlook 2010 Using Outlook 2
S Help needed - syncing outlook emails with iphone 4s Using Outlook 4

Similar threads