Many thanks for the program code, it worked GREAT...
"Sue Mosher [MVP-Outlook]" wrote:
Try this Word macro:
Sub AddInfoToMsg()
Dim env As Office.MsoEnvelope
Set env = ActiveDocument.MailEnvelope
With env
.Introduction = "My introduction"
.Item.To = "
.Item.cc = "
End With
Set env = Nothing
End Sub
--
Sue Mosher, Outlook MVP
Author of Microsoft Outlook 2007 Programming:
Jumpstart for Power Users and Administrators
http://www.outlookcode.com/article.aspx?id=54
"smar" wrote in message ...
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