emailing thru Word 2003

R

red6000

I am tyring to send an email using Word 2003 and the mailmerge function as
follows:

With Documents("ProcessUpdate.doc").MailMerge
.MailAddressFieldName = "Email"
.MailSubject = "Process Update"
.Destination = wdSendToEmail
.MailFormat = wdMailFormatPlainText
.Execute
End With

Now this works fine, however I really want to send it in formatted text, so
changed the code to:

.MailFormat = wdMailFormatHTML

However, this just doesn't work. I get no errors and no messages arrive.

I have found out that if I run the mail merge manually using html it also
doesn't work. So I'm looking for alternatives to using mailmerge.

I know I can use distribution lists and skip VBA completely, but at work the
server limits you to 50 names, so I'm currently having to send the mail 5
times (and the number of staff are set to grow consdierably).

Therefore I've been trying to come up with a VBA route, where I can get the
code to run 5 (or more times) each time sending to 50 different people to
save me having to re-send the email each time.

Any ideas?

Thanks.
 
D

Doug Robbins - Word MVP

You really have no way of controlling the way in which the recipient will
view the document.

You could use the add-in that you can download from:

http://www.gmayor.com/individual_merge_letters.htm

to create individual documents for each recipient, the use the method in the
article "Mail Merge to E-mail with Attachments" at

http://word.mvps.org/FAQs/MailMerge/MergeWithAttachments.htm

To send each individual document as an attachment. If you have the facility
to save each document as a .pdf file (as in an option with the add-in if you
have Adobe Acrobat), you can then definitely control the way in which the
recipient will see the document.

--
Hope this helps.

Please reply to the newsgroup unless you wish to avail yourself of my
services on a paid consulting basis.

Doug Robbins - Word MVP
 
R

red6000

Okay, the code I posted:
With Documents("ProcessUpdate.doc").MailMerge
.MailAddressFieldName = "Email"
.MailSubject = "Process Update"
.Destination = wdSendToEmail
.MailFormat = wdMailFormatHTML
.Execute
End With

does actually work in teh office fine. However, I get a confirmation box
each time saying that Outlook is attemping to send an email and asks if you
want do so. This then asks it for each email, so I am having to 'okay' 250
times.

Is there any code I can put in to bypass these messages (I think it may
actually be an Outlook warning that is cutting in as opposed to word).

Thanks.
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top