Program data into the "To, Cc and Introduction" fields

S

smar

I am in MS Word 2003 and I select the E-Mail icon on the Toolbar. It brings
up the
Outlook 2003 "To:..., Cc..., Subject: and Introduction:" fields at the top
of the Word document, along with some of the Outlook toolbar icons.

I want add some code a MS Word macro to insert email addresses into the To:
and Cc: fields, instead of typing them in over and over. I would some
appreciate sample code. I tried using the MS Word group with no luck, so I
am trying the Outlook group
 
S

Sue Mosher [MVP-Outlook]

Try this Word macro:

Sub AddInfoToMsg()
Dim env As Office.MsoEnvelope
Set env = ActiveDocument.MailEnvelope
With env
.Introduction = "My introduction"
.Item.To = "(e-mail address removed)"
.Item.cc = "(e-mail address removed)"
End With
Set env = Nothing
End Sub
 

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

Similar Threads

Test if cursor is in To... field 1
New computer, how do i move outlook 365 ENTIRELY? 0
Need help modifying code 0
In cutom form "To" and "CC" fields get shrink 0
Loop through pages and insert header image 0
How do I hide e-mail fields in my Word 2003 UI 1
Rule for name in "cc" field 1
Using Access to obtain E-mail address 5

Top