Si të dërgoni automatikisht një njoftim me email të Outlook kur përditësohet një fletë pune specifike e Excel

Zgjidhjet e Outlook Shtator 29, 2025

Sa herë që përditësoni një fletë pune specifike të Excel, nëse gjithmonë keni nevojë të dërgoni një njoftim me email te marrës të veçantë, mund të përdorni metodën e prezantuar në këtë artikull.

Disa përdorues kërkojnë një zgjidhje për të lejuar që MS Excel të dërgojë automatikisht një njoftim me email të Outlook për persona të caktuar sa herë që përditësojnë një fletë pune specifike, pasi shpesh harrojnë të dërgojnë një email të tillë. Tani, në vijim, ne do të udhëzojmë se si ta arrijmë këtë funksion me kodin VBA.

Dërgoni automatikisht një njoftim me email të Outlook kur përditësohet një fletë pune specifike e Excel

Dërgoni automatikisht një email kur përditësohet një fletë pune specifike e Excel

  1. Në radhë të parë, merrni akses në librin burimor të Excel-it që përmban fletën specifike të punës.
  2. Më pas, në dritaren e MS Excel, shkoni te menyja "File" dhe zgjidhni "Opsionet".
  3. Më pas, në dritaren "Opsionet e Excel", kaloni në skedën "Trust Center" dhe klikoni në butonin "Cilësimet e Qendrës së Besimit".
  4. Më pas, në dritaren e re, kaloni në skedën "Cilësimet e makrove", nën të cilën duhet të zgjidhni "Aktivizo të gjitha makrot".Aktivizo të gjitha makrot
  5. Pas kësaj, kthehuni te skeda "Opsionet e privatësisë" dhe aktivizoni funksionin "Hiqni informacionin personal nga vetitë e skedarit në ruajtje".Ndryshoni opsionet e privatësisë
  6. Pastaj, klikoni disa "OK" për të ruajtur këto cilësime.
  7. Pas mbështetjes në librin e punës Excel, hyni në fletën e punës specifike.
  8. Klikoni me të djathtën mbi emrin e fletës së punës në shiritin anësor të poshtëm dhe zgjidhni "Shiko kodin".Shiko Kodin
  9. Pas kësaj, kopjoni kodin e mëposhtëm VBA në projektin e fletës specifike.
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

Kodi VBA - Dërgoni automatikisht një email kur përditësohet një fletë pune specifike e Excel

  1. Pas kësaj, duhet ta ruani këtë libër pune si libër pune me Macro-Enabled Excel.
  • Së pari, mbyllni dritaren "Microsoft Visual Basic për aplikacione".
  • Pastaj, klikoni "File" në këndin e sipërm të majtë.
  • Tjetra, zgjidhni "Ruaj si".
  • Në kutinë e dialogut, zgjidhni "Excel Macro-Enabled Workbook" në fushën "Ruaj si lloj".
  • Në fund, klikoni në butonin "Ruaj".Ruani si libër pune me Macro-Enabled Excel
  1. Më në fund, mund ta mbyllni këtë libër pune.
  2. Tani, mund të hapni librin e punës të ruajtur më parë me makro të aktivizuar në Excel.
  3. Kur bëni ndonjë ndryshim në fletën specifike të punës, do të merrni një mesazh që ju kërkon të dërgoni një njoftim me email.Merrni një konfirmim kur përditësoni fletën e punës
  4. Kur klikoni butonin "Po", një email i Outlook do t'u dërgohet marrësve të paracaktuar.
  5. Ky email do të duket si pamja e ekranit më poshtë:Njoftimi me email të Outlook

Riparoni skedarin e të dhënave të dëmtuara të Outlook

Ndoshta ju keni hasur ndonjëherë në korruptim të skedarëve Excel. Në fakt, skedari i të dhënave Outlook është njësoj i cenueshëm si skedari Excel. Për shembull, mbyllja e gabuar e Outlook mund të çojë në korrupsion të skedarëve PST lehtësisht. Prandaj, është thelbësore të ndërmerren veprime për të mbrojtur skedarin Outlook, duke përfshirë bërjen e kopjeve rezervë të rregullt të të dhënave, si dhe përgatitjen e një mjeti të fuqishëm rregullues PST, si p.sh. DataNumen Outlook Repair. Ky mjet është mjaft i fuqishëm për të riparim PST problemet dhe rikuperoni të dhënat e PST.

Hyrje e autorit:

Shirley Zhang është një eksperte për rikuperimin e të dhënave DataNumen, Inc., e cila është lider botëror në teknologjitë e rikuperimit të të dhënave, duke përfshirë rregullim sql dhe produkte softuerike të riparimit të pamjes. Për më shumë informacion vizitoni www.datanumen.com

Komentet janë të mbyllura.