Automatic email from excel

  • Thread starter Thread starter rahul sharma
  • Start date Start date
R

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.
 
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!
 
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
 
Back
Top