Paano Mag-Auto Magpadala ng isang Outlook Email Notification kapag na-update ang isang Tiyak na Excel Worksheet

Sa tuwing nag-a-update ka ng isang tukoy na worksheet ng Excel, kung palagi kang kailangang magpadala ng isang abiso sa email sa mga tukoy na tatanggap, maaari mong gamitin ang pamamaraang ipinakilala sa artikulong ito.

Humihiling ang ilang mga gumagamit ng isang solusyon upang awtomatikong magpadala ang MS Excel ng isang abiso sa email ng Outlook sa mga tukoy na tao tuwing nag-a-update sila ng isang tukoy na worksheet, na madalas nilang nakakalimutang magpadala ng gayong email. Ngayon, sa mga sumusunod, gagabayan namin kung paano makamit ang pagpapaandar na ito gamit ang VBA code.

Auto Magpadala ng isang Email kapag Nai-update ang isang Tiyak na Excel Worksheet

1. Sa unang lugar, kumuha ng access sa pinagmulan ng workbook ng Excel na naglalaman ng tukoy na worksheet.
2. Pagkatapos, sa window ng MS Excel, magtungo sa menu na 'File ”at piliin ang“ Opsyon ”.
3. Susunod, sa window na "Mga Pagpipilian ng Excel", lumipat sa tab na "Trust Center" at mag-click sa pindutang "Mga Setting ng Trust Center".
4. Kasunod, sa bagong window, lumipat sa tab na "Mga Setting ng Macro", kung saan dapat mong piliin ang "Paganahin ang lahat ng mga macros".
5. Pagkatapos nito, buksan ang tab na "Mga Pagpipilian sa Privacy" at paganahin ang tampok na "Alisin ang personal na impormasyon mula sa mga pag-aari ng file sa pag-save."
6. Pagkatapos, mag-click sa maraming "OK" upang mai-save ang mga setting na ito.
7. Pagkatapos ng pag-back sa workbook ng Excel, i-access ang tukoy na worksheet.
8. Mag-right click sa pangalan ng worksheet sa ibabang sidebar at piliin ang "View Code".
9. Pagkatapos nito, kopyahin ang sumusunod na VBA code sa proyekto ng tukoy na sheet.

Private Sub Worksheet_Change(ByVal Target As Range)
    Dim nConfirmation As Integer
    Dim objNewWorkbook As Excel.Workbook
    Dim objNewWorksheet As Excel.Worksheet
    Dim objOutlookApp As Object
    Dim objMail As Object
 
    nConfirmation = MsgBox("Do you want to send an email notification about the sheet updating now?", vbInformation + vbYesNo, "Mail Sheet Updates")
 
    If nConfirmation = vbYes Then
       ActiveWorkbook.Save

       On Error Resume Next
       Set objOutlookApp = CreateObject("Outlook.Application")
       Set objMail = objOutlookApp.CreateItem(olMailItem)
  
       'Change the email details as per your needs
       With objMail
           .To = "test@datanumen.com"
           .Subject = "Email Notifying Sheet Updates"
           .Body = "Hi," & vbCrLf & vbCrLf & "The worksheet " & Chr(34) & ActiveWorkbook.Sheets(1).Name & Chr(34) & " in this Excel workbook attachment is updated."
           'Attach this workbook
           .Attachments.Add ActiveWorkbook.FullName
           .Send
      End With
    End If
End Sub

10. Pagkatapos nito, dapat mong i-save ang workbook na ito bilang Excel Macro-Enified workbook.

• Una, isara ang window ng "Microsoft Visual Basic for Applications".
• Pagkatapos, i-click ang "File" sa kaliwang sulok sa itaas.
• Susunod, piliin ang "I-save Bilang".
• Sa kahon ng dayalogo, mag-opt para sa "Excel Macro-Pinaganang Workbook" sa patlang na "I-save bilang uri".
• Panghuli, i-click ang pindutang "I-save".

11. Panghuli, maaari mong isara ang workbook na ito.
12. Ngayon, maaari mong buksan ang dating nai-save na workbook na pinapagana ng Excel macro.
13. Kapag gumawa ka ng anumang mga pagbabago sa tukoy na worksheet, makakakuha ka ng isang mensahe na nagtatanong kung magpadala ng isang notification sa email.
14. Kapag na-click mo ang "Oo" na pindutan, isang email sa Outlook ang ipapadala sa mga paunang natukoy na tatanggap.
15. Ang email na ito ay magiging hitsura ng screenshot sa ibaba:

Pag-ayos ng Nasirang File ng Data ng Outlook

Marahil ay nakaranas ka ng katiwalian sa file ng Excel. Sa totoo lang, ang file ng data ng Outlook ay parehong mahina laban sa Excel file. Halimbawa, ang maling pagsasara ng Outlook ay maaaring humantong sa PST file na madaling mangyari sa katiwalian. Samakatuwid, mahalaga na gumawa ng mga pagkilos upang mapangalagaan ang file ng Outlook, kabilang ang paggawa ng regular na pag-backup ng data pati na rin ang paghahanda ng isang matatag na tool sa pag-aayos ng PST, tulad ng DataNumen Outlook Repair. Ang utility na ito ay sapat na malakas upang ayusin ang PST mga isyu at mabawi ang data ng PST.

Panimula ng May-akda:

Si Shirley Zhang ay isang dalubhasa sa pagbawi ng data sa DataNumen, Inc., na pinuno ng mundo sa mga teknolohiya sa pagbawi ng data, kasama ang sql ayusin at pananaw sa pag-aayos ng mga produktong software. Para sa karagdagang impormasyon pagbisita www.datanumen. Sa