Bayt.com

Communiquez avec les autres et partagez vos connaissances professionnelles

Inscrivez-vous ou connectez-vous pour rejoindre votre communauté professionnelle.

Suivre

Excel macro email notification

Macro that send email notification if the exel file(s) is/are modified

VBA Microsoft Excel Microsoft Office Global Macro Microsoft Office Applications
user-image
Question ajoutée par Pablo Dimaunahan , AV and ELV CAD Draftsman , Site Technology LTD. Co.
Date de publication: 2015/05/26
Apprécier (0) Vues (11) Suiveurs (2) Réponses (2) Report Question
Ajoutez Une Réponse
Inscrivez-vous ou connectez-vous pour répondre.
FITAH MOHAMED
par FITAH MOHAMED , Financial Manager , FUEL AND ENERGY CO for transportion petroleum materials

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, _ Cancel As Boolean) Dim answer As String answer = MsgBox("This is where you put the text to prompt the user if he wants to save or not" vbYesNo, "here is the title of that box") If answer = vbNo Then Cancel = True If answer = vbYes Then 'open outlook type stuff Set OutlookApp = CreateObject("Outlook.Application") Set OlObjects = OutlookApp.GetNamespace("MAPI") Set newmsg = OutlookApp.CreateItem(olMailItem) 'add recipients 'newmsg.Recipients.Add ("Name Here") newmsg.Recipients.Add ("") 'add subject newmsg.Subject = "Subject line of auto email here" 'add body newmsg.Body = "body of auto email here" newmsg.Display 'display newmsg.Send 'send message 'give conformation of sent message MsgBox "insert confirmation box test here",, "title of confirmation box" End If 'save the document 'Me.Worksheets.Save End Sub

Firas Shahadi
par Firas Shahadi , Training And Development Director , Muhayal Assir National Hospital

sending email is easy.

but to send an email every time the sheet changed, you need to think about it.

 

to send the work book check this web site here

 

Ecrivez Votre Réponse
More Questions Like This

Avez-vous besoin d'aide pour créer un CV ayant les mots-clés recherchés par les employeurs?

Obtenir de l'aide