Send Email Without Workbook in Excel 1

[AirZebra]

Hi all,

I am using the following code to send a workbook through email (Eudora). What I would like to do is send an email message without the workbook if there is no data in the workbook. Does anyone have any ideas?

ActiveWorkbook.SendMail Recipients:="email.address@customer.gov.uk", Subject:="Cashbox Level Warnings"
AppActivate ("Eudora by Qualcomm")[\code]

I can test to see whether the workbook is blank, but does anyone know how to send a message without the workbook?

Regards,

Alan

 

[VulcanJedi]

try ActiveWorkbook.FollowHyperlink Address:="mailto:someone@hotmail.com", _ NewWindow:=False, AddHistory:=True

 

[Chopsaki]

You could use the CDONTS object (NewMail).
foo

 

[AirZebra]

Thanks guys,

Tranpkp, That works fine, and I will use it as soon as I can get the subject and message to appear.

Chopsaki, sorry I couldn't find any reference to either newmail or cdonts in the help files.

Regards,

Alan

 

[VulcanJedi]

Glad I could help! Tranpkp
************************************
- Let me know if this helped/worked!