Outlook에서 작업을 완료 한 후 많은 사용자가 상사와 같은 사람에게 알리기 위해 알림 이메일을 보내려고 할 수 있습니다. 이메일을 수동으로 보내는 것은 시간이 많이 걸립니다. 이 기사에서는 이러한 종류의 이메일을 자동으로 보내는 빠른 방법을 소개합니다.
기사에서 "Outlook에서 다른 사람에게 작업을 할당하는 4 가지 빠른 단계”, 당신은 당신의 상사로부터 임무가 당신에게 할당되었고 그들이 아래 스크린 샷과 같이 사전에 상태보고를 요구했다면, 그들은 자동으로보고 이메일을받을 수있을 것입니다.
그러나 작업을 직접 만든 경우 Outlook은 완료로 표시 할 때 누구에게도 알림 전자 메일을 보내지 않습니다. 이 경우 작업을보고하기 위해 알림 이메일을 보내려면 수동으로해야합니다. 그러나 다음 VBA 코드를 사용하면 Outlook이 자동으로 수행하도록 할 수 있습니다.
특정 작업이 완료되면 자동으로 알림 이메일 보내기
- 먼저 Outlook을 실행하고 "개발자" 탭으로 이동하십시오.
- 그런 다음 "Visual Basic"버튼을 찾아 클릭합니다. 새로운 "Microsoft Visual Basic for Applications"창이 나타납니다.
- 그런 다음 "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
- 계속해서이 코드에 서명하고 디지털 서명 된 매크로 만 허용하도록 매크로 설정을 변경합니다.
- 마지막으로 현재 창을 종료하고 시도해 볼 수 있습니다.
- 작업을 완료로 표시하면 다음 이미지와 같은 메시지가 표시됩니다.
- "예"버튼을 클릭하면 아래 그림과 같이 새 메시지가 열립니다.
참고 : “.display”를“.Send”줄로 바꾸면이 이메일은 나타나지 않고 바로 발송됩니다.
알 수없는 이메일 주소의 메시지에주의
알 수없는 주소에서 많은 이메일을 받았을 것입니다. 이러한 종류의 이메일에주의하는 것이 좋습니다. 무해 해 보이지만 악성 링크, 첨부 파일 또는 매크로가 포함되어 있기 때문입니다. 클릭하거나 열면 Outlook이 감염 될 수 있습니다. 그 시점에서 Outlook 데이터를 되돌리려면 별을 사용할 수밖에 없습니다. 손상된 Outlook 데이터 수정 유틸리티같은 DataNumen Outlook Repair.
저자 소개 :
Shirley Zhang은 데이터 복구 전문가입니다. DataNumen, Inc.는 다음과 같은 데이터 복구 기술 분야의 세계적 리더입니다. SQL mdf 문제 복구 및 전망 수리 소프트웨어 제품. 자세한 내용은 WWW.datanumen.COM


