E-mail értesítések létrehozása az Excel lapfrissítésekhez

Ha megosztott hálózaton dolgozik, nagyon gyakori, hogy több alkalmazott hozzáfér a közös fájlhoz és megváltoztatja azt a nap folyamán. Ez a cikk bemutatja, hogyan kell végrehajtani egy makrót a Microsoft Excel programban, amely automatikusan küld e-mailt minden alkalommal, amikor egy közös dokumentum módosítására kerül sor.

Excel makró a jel-dokumentum változásokhoz

Programozhatja ezt a makrót, hogy e-maileket küldjön egy adott csapat tagjának, hogy figyelmeztesse őket a hálózati fájl módosításairól.

 Privát Sub Workbook_BeforeSave (ByVal SaveAsUI mint Boolean, _
Booleanként törlése
Válasz Sztringként
answer = MsgBox ("Ez az a hely, ahol a szöveget a felhasználóra kéri, ha el akarja menteni, vagy nem" vbYesNo, "itt van a doboz címe")
Ha a válasz = vbNo, akkor Cancel = True
Ha a válasz = vbYes, akkor
"nyílt kilátástípusú cucc
OutlookApp = CreateObject beállítása ("Outlook.Application")
OlObjects = OutlookApp.GetNamespace ("MAPI") beállítása
Newmsg = OutlookApp.CreateItem (olMailItem) beállítása
'címzettek hozzáadása
'newmsg.Recipients.Add ("Név itt")
newmsg.Recipients.Add (" ")
'Téma hozzáadása
newmsg.Subject = "Az automatikus e-mail cím itt"
- add testet
newmsg.Body = "automatikus e-mail cím itt"
newmsg.Display "kijelző
Új üzenet küldése
„adja meg az elküldött üzenet konformációját
MsgBox "beilleszti a megerősítő doboz tesztjét itt",, "a megerősítő doboz címe"
Vége Ha
'mentse el a dokumentumot
„Me.Worksheets.Save
Vége vége