Automatic email once file is closed

[mjmoon]

Greetings:
I would like to write a macro that once a user does a file save and exits out of a specific file it will automatically generate an email notification to a specific person. Any thougths on how I would write the code and even if it is feasible?

Thanks for your consideration. Marc

 

[VoG]

In the ThisWorkbook module

Private Sub Workbook_BeforeClose(Cancel As Boolean)
Call MyMail
End Sub

You should be able to get the code for MyMail here http://www.rondebruin.nl/sendmail.htm

 

[mjmoon]

Thanks. I think I will be able to make this work.

 

[mjmoon]

Thanks for your tip, everything worked except I am getting a Microsoft Office Outlook message that states the following: A program is trying to send and e-mail message on your behlf. It this is unexpected, click Deny and verify your anitvirus software is up-to-date. For more information about e-mail safety and how you might be able to avoid getting this warning, click Help.

Is there anyway I can rid of this message with sometype of code. This will just end up confusing my users.

 

[VoG]

See if this helps http://www.rondebruin.nl/mail/prevent.htm

 

[mjmoon]

Thanks. After reading that I decided to use the .display code versus the .send. It was getting over my head on how to correct that and I don't have the energy to work this through with my IS department. Thanks you again!