Izveidot e-pasta paziņojumus Excel lapu atjauninājumiem

Strādājot pie koplietošanas tīkla, ir ļoti bieži, ka vairāki darbinieki visu dienu piekļūst un maina kopējos failus. Šajā rakstā tiks izskaidrots, kā īstenot Microsoft Excel makro, kas katru dienu nosūtīs automātisku e-pasta ziņojumu, kad tiek veikta kopīga dokumenta izmaiņas.

Excel makro uz signālu dokumentu izmaiņām

Šo makro var ieprogrammēt, lai nosūtītu e-pastus konkrētiem komandas locekļiem, lai brīdinātu viņus par izmaiņām tīkla failā.

Privāts subgrāmatas_BeforeSave (ByVal SaveAsUI Kā Būla, _

Atcelt kā boolean)

Atbildēt kā virkni

answer = MsgBox ("Šis ir tas, kur jūs ievietojat tekstu, lai uzaicinātu lietotāju, ja viņš vēlas saglabāt vai nē" vbYesNo, "šeit ir šīs kastes nosaukums")

Ja atbilde = vbNo Tad Atcelt = True

Ja atbilde = vbYes Tad

'atvērtu perspektīva veida stuff

Iestatīt OutlookApp = CreateObject ("Outlook.Application")

Iestatīt OlObjects = OutlookApp.GetNamespace ("MAPI")

Set newmsg = OutlookApp.CreateItem (olMailItem)

'pievienot adresātus

'newmsg.Recipients.Add ("Nosaukums šeit")

newmsg.Recipients.Add (" ")

'pievienot tēmu

newmsg.Subject = "Automātiskās e-pasta tēmas rinda šeit"

pievienot ķermeni