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 gkittelson on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

Recipients.add not working when word set as email editor

Status
Not open for further replies.

1DMF

Programmer
Jan 18, 2005
8,795
GB
Hi,

How do you resolve the issue of using VBA to create a mail item and add recipients when using MS word as email editor.

I have the following...
Code:
Set oReceipt = .Recipients.Add(rs.Fields("EmailName"))
oReceipt.Type = olTo
l_Msg.Close (olSave)
l_Msg.Display

When the email opens, the TO field is blank?

It works fine if Word is not set as email editor.

How do I resolve this?

Thanks,
1DMF.

"In complete darkness we are all the same, only our knowledge and wisdom separates us, don't let your eyes deceive you."

"If a shortcut was meant to be easy, it wouldn't be a shortcut, it would be the way!"

Google Rank Extractor -> Perl beta with FusionCharts
 
Why not simply this ?
l_Msg.To = rs!EmailName

Hope This Helps, PH.
FAQ219-2884
FAQ181-2886
 
because that's a simplified version of the code, it's dependent on whether the recipient should be in the 'TO' or it could be a whole bunch of BCC's

either way it doesn't show when word is used for email editing, works fine, when word is deselected?

Would you like to see the full code snippet?

"In complete darkness we are all the same, only our knowledge and wisdom separates us, don't let your eyes deceive you."

"If a shortcut was meant to be easy, it wouldn't be a shortcut, it would be the way!"

Google Rank Extractor -> Perl beta with FusionCharts
 
Status
Not open for further replies.

Part and Inventory Search

Sponsor

Back
Top