Debbie,

Try
Application.Dialogs(xlDialogSendMail).Show "

If you want more than one address, just separate addresses in the list with
semicolons and enclose the entire string in double quotes.


Steve Yandl




"Debbie Horner" wrote in message
...
I want to open the Outlook dialog box and populate the "to address" with an
email address - I do not want the email to automatically send. I
currently
have code which opens up the dialog box fine..just need to add email
address
to it..

code is currently
Application.Dialogs(xlDialogSendMail).Show

Thank you