Automatic email from excel

[rahul sharma]

I have a shared Excel workbook that everybody uses. If anyone changes
anything in the excel or saves it, I would like to be notified. IS
there anyway in excel to make it send me an email automatically
whenever something is changed?
Help is much appreciated.

 

[M. Preston]

This is the EXACT question I was going to post. I wonder
if there is a way to do this automatically, without
macros (or other user-initiated actions). Often macros
are disabled at work, and would not run even if I
recorded one.
Thanks!

 

[Loz]

Hi,

I'm not very good at coding and I have some source code
from somewhere else (sorry I don't know where) that
answers part of your question. Hopefully one of the wizzes
out there can assist with the rest.
Sorry if I've wasted your time.
Cheers,
Loz
************

Sub Send_Msg()

Dim objOL As New Outlook.Application
Dim objMail As MailItem

Set objOL = New Outlook.Application
Set objMail = objOL.CreateItem(olMailItem)

With objMail
.To = "(e-mail address removed)"
.Subject = "Automated Mail Response"
.Body = "This is an automated message from Excel. " & _
"The cost of the item that you inquired about
is: " & _
Format(Range("A1").Value, "$ #,###.#0") & "."
.Display
.Send
End With

Set objMail = Nothing
Set objOL = Nothing
'For Each...Next Statement
End Sub