xlDialogSendMail

Posted by Ben Adams on July 13, 2001 4:57 PM

I know how to use xlDialogSendMail to send a workbook as an attatchment, but how do I specify a recipiant or subject?

Posted by Ivan F Moala on July 16, 2001 3:51 AM

Ben.....online help provides a start... I think
this has been covered before.....BUT here is an
example.......

Sub EmailWorkBook()
Dim Send As Dialog
'xlDialogSendMail Recipients, Subject, return_receipt
On Error Resume Next
Send = Application.Dialogs(xlDialogSendMail).Show("phoenix@voyager.co.nz", "test", True)
If Send Is Nothing Then Exit Sub
MsgBox "Sent"
End Sub

Ivan