Paano Awtomatikong Magpadala ng Notification Email Kapag Nakumpleto ang isang Partikular na Gawain sa Outlook

Pagkatapos makumpleto ang isang gawain sa Outlook, maraming mga gumagamit ang maaaring nais na magpadala ng isang email ng abiso upang abisuhan ang isang tao, tulad ng nakatataas. Ang pagpapadala ng email nang manu-mano ay makakaubos ng oras. Ang artikulong ito ay magpapakilala ng isang mabilis na paraan upang awtomatikong ipadala ang ganitong uri ng mga email.

Mula sa artikulong “4 Mabilis na Hakbang para Magtalaga ng Gawain sa Iba sa Iyong Outlook”, maaari mong malaman na kung ang gawain ay itinalaga sa iyo mula sa iyong superyor at kailangan nila ng isang ulat sa katayuan nang maaga, tulad ng screenshot sa ibaba, awtomatiko silang makakatanggap ng isang ulat ng email.

Gayunpaman, kung ginawa mo lang ang gawain sa iyong sarili, hinding-hindi magpapadala ang Outlook ng email ng notification sa sinuman kapag minarkahan mo ito bilang kumpleto. Sa kasong ito, kung gusto mong magpadala ng email ng notification upang iulat ang iyong trabaho, kailangan mong gawin ito nang manu-mano. Ngunit sa mga sumusunod na VBA code, maaari mong hayaan ang Outlook na awtomatikong magawa ito.

Awtomatikong Magpadala ng Notification Email Kapag Nakumpleto ang isang Partikular na Gawain

1. Una, dapat mong simulan ang Outlook at lumipat sa tab na "Developer".
2. Pagkatapos ay hanapin at i-click ang "Visual Basic" na buton. May lalabas na bagong window na "Microsoft Visual Basic for Applications".
3. Pagkatapos nito, i-double click ang proyektong "ThisOutlookSession" upang buksan ito at pagkatapos ay kopyahin ang mga sumusunod na VBA code dito.

Public WithEvents olItems As Outlook.Items

Private Sub Application_Startup()
    Set olItems = Session.GetDefaultFolder(olFolderTasks).Items
End Sub

Private Sub olItems_ItemChange(ByVal Item As Object)
    Dim obApp As Outlook.Application
    Dim olMail As Outlook.MailItem
    Dim Recip As String
 
    'Replace "test" as per your needs
    If InStr(LCase(Item.Subject), "test") > 0 And Item.Complete = True Then
       'Replace with your desired contact
       Recip = "John Smith"
       If MsgBox("Do you want to send a report to " & Recip & " ?", vbYesNo + vbQuestion, "Confirm Sending Report") = vbYes Then
          Set obApp = Outlook.Application
          Set olMail = obApp.CreateItem(olMailItem)
          With olMail
               .To = Recip
               .Subject = "Complete: " & Item.Subject
               .Body = "Dear Mr. Smith" & vbCrLf & "I've completed this task in " & DateDiff("d", Item.CreationTime, Now) & " day" & Chr(40) & "s" & Chr(41) & "." & vbCrLf & vbCrLf & "Task Name: " & Item.Subject & vbCrLf & "Start Date: " & Item.StartDate & vbCrLf & "Due Date: " & Item.DueDate & vbCrLf & "Creation Time: " & Item.CreationTime & vbCrLf & "Completed Time: " & Now & vbCrLf & vbCrLf & "Task Details: " & vbCrLf & Item.Body
               .ReadReceiptRequested = True
               'To directly send it,use ".Send" instead
               .Display
          End With
       End If
    End If
End Sub

4. Pagkatapos ay magpatuloy upang lagdaan ang code na ito at baguhin ang mga setting ng macro upang pahintulutan lamang ang mga digitally sign na macro.
5. Sa wakas maaari kang lumabas sa kasalukuyang window at subukan.

• Kapag minarkahan mo ang isang gawain bilang kumpleto, makakatanggap ka ng mensahe, tulad ng sumusunod na larawan:
• Kapag nag-click ka sa pindutang "Oo", isang bagong mensahe ang magbubukas, na ipinapakita tulad ng larawan sa ibaba:

tandaan: Kung papalitan mo ang “.display” ng linyang “.Send,” direktang ipapadala ang email na ito nang hindi lumalabas.

Bigyang-pansin ang Mga Mensahe mula sa Mga Hindi Kilalang Email Address

Dapat ay nakatanggap ka na ng maraming email mula sa hindi kilalang mga address. Maipapayo na manatiling maingat sa ganitong uri ng mga email. Ito ay dahil maaari silang magmukhang hindi nakapipinsala ngunit naglalaman ng mga nakakahamak na link, attachment o macro. Kapag na-click o nabuksan mo ang mga ito, maaaring mahawahan ang iyong Outlook. Sa puntong iyon, upang maibalik ang iyong data sa Outlook, wala kang pagpipilian kundi gamitin ang isang stellar nasira ang Outlook data fix utility, Gaya ng DataNumen Outlook Repair.

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 ayusin ang problema sa SQL mdf at pananaw sa pag-aayos ng mga produktong software. Para sa karagdagang impormasyon pagbisita www.datanumen. Sa