Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations strongm on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

Microsoft Outlook - send a template email from excel 1

Status
Not open for further replies.

taoboy

Programmer
Aug 28, 2002
3
GB
Hi,

I have an excel spreadsheet which contains a list of e-mail addresses + some personal info. I have written a vba routine which loops through the spreadsheet, creates and sends out a personalised e-mail to each recipient. This is all working nicely but is all in plain text and missing signatures etc.

I have created a template e-mail and saved it in the "user templates in file system folder".

I would like to know how to access this e-mail template instead of creating a new e-mail message each time.

Many thanks for any help you can offer.

Regards

Steve
 
I suggest, you save it to a local path as Message (*.msg).

I assume you have a line like this in your code:
Set olm=ol.CreateItem("MailItem")
comment it out and use this instead:
Set olm=ol.CreateItemFromTemplate("path to your saved mail template")

Whereas olm is Dimmed as Outlook.MailItem and ol as Outlook.Application

Hope this helps,
MakeitSo

Andreas Galambos
EDP / Technical Support Specialist
(andreas.galambos@bowneglobal.de)
HP:
 
Hi Andreas,
Thanks for your help. I did actually get it working by saving a form (called testmail) in the personal directory and using the following to open it

Set objMail = objInbox.Items.Add("IPM.NOTE.testmail")

This seems to work ok but I will have a play using your method as well.

MAny thanks

Steve


 
Status
Not open for further replies.

Part and Inventory Search

Sponsor

Back
Top