Outlook에서 특정 작업이 완료되면 알림 전자 메일을 자동으로 보내는 방법

지금 공유 :

Outlook에서 작업을 완료 한 후 많은 사용자가 상사와 같은 사람에게 알리기 위해 알림 이메일을 보내려고 할 수 있습니다. 이메일을 수동으로 보내는 것은 시간이 많이 걸립니다. 이 기사에서는 이러한 종류의 이메일을 자동으로 보내는 빠른 방법을 소개합니다.

기사에서 "Outlook에서 다른 사람에게 작업을 할당하는 4 가지 빠른 단계”, 당신은 당신의 상사로부터 임무가 당신에게 할당되었고 그들이 아래 스크린 샷과 같이 사전에 상태보고를 요구했다면, 그들은 자동으로보고 이메일을받을 수있을 것입니다.작업 상태 보고서 필요

그러나 작업을 직접 만든 경우 Outlook은 완료로 표시 할 때 누구에게도 알림 전자 메일을 보내지 않습니다. 이 경우 작업을보고하기 위해 알림 이메일을 보내려면 수동으로해야합니다. 그러나 다음 VBA 코드를 사용하면 Outlook이 자동으로 수행하도록 할 수 있습니다.

특정 작업이 완료되면 자동으로 알림 이메일 보내기

  1. 먼저 Outlook을 실행하고 "개발자" 탭으로 이동하십시오.
  2. 그런 다음 "Visual Basic"버튼을 찾아 클릭합니다. 새로운 "Microsoft Visual Basic for Applications"창이 나타납니다.
  3. 그런 다음 "ThisOutlookSession"프로젝트를 두 번 클릭하여 열고 다음 VBA 코드를 복사합니다.
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

ThisOutlookSession에 VBA 코드 복사

  1. 계속해서이 코드에 서명하고 디지털 서명 된 매크로 만 허용하도록 매크로 설정을 변경합니다.
  2. 마지막으로 현재 창을 종료하고 시도해 볼 수 있습니다.
  • 작업을 완료로 표시하면 다음 이미지와 같은 메시지가 표시됩니다.보고서 발송 확인
  • "예"버튼을 클릭하면 아래 그림과 같이 새 메시지가 열립니다.알림 이메일

참고 : “.display”를“.Send”줄로 바꾸면이 이메일은 나타나지 않고 바로 발송됩니다.

알 수없는 이메일 주소의 메시지에주의

알 수없는 주소에서 많은 이메일을 받았을 것입니다. 이러한 종류의 이메일에주의하는 것이 좋습니다. 무해 해 보이지만 악성 링크, 첨부 파일 또는 매크로가 포함되어 있기 때문입니다. 클릭하거나 열면 Outlook이 감염 될 수 있습니다. 그 시점에서 Outlook 데이터를 되돌리려면 별을 사용할 수밖에 없습니다. 손상된 Outlook 데이터 수정 유틸리티같은 DataNumen Outlook Repair.

저자 소개 :

Shirley Zhang은 데이터 복구 전문가입니다. DataNumen, Inc.는 다음과 같은 데이터 복구 기술 분야의 세계적 리더입니다. SQL mdf 문제 복구 및 전망 수리 소프트웨어 제품. 자세한 내용은 WWW.datanumen.COM

지금 공유 :

댓글이 닫혀있다.