특정 일 이후 특정 보낸 사람의 Outlook 이메일을 자동 삭제하는 방법

지금 공유 :

Outlook에서 특정 날짜의 특정 보낸 사람이 보낸 전자 메일을 자동으로 삭제하도록하려면이 문서를 읽을 수 있습니다. 여기에서는 VBA 코드를 사용하여 가져 오는 자세한 단계를 보여줍니다.

이메일 자동 삭제와 관련하여 먼저 "자동 보관"기능을 생각할 수 있습니다. 그러나 이메일을 자동 보관할 때 특정 발신자를 필터링 할 수 없습니다. 따라서 예를 들어 x 일 후에 특정 발신자가 보낸 이메일을 자동 삭제하려면 다음과 같은 다른 방법을 사용해야합니다.

X 일 후 특정 발신자의 이메일 자동 삭제

  1. 처음에는 star당신의 Outlook 응용 프로그램.
  2. 그런 다음 "에 따라 Outlook VBA 편집기를 트리거합니다.Outlook에서 VBA 코드를 실행하는 방법".
  3. 다음으로 다음 VBA 코드를 "ThisOutlookSession"프로젝트에 복사합니다.
Public WithEvents objInboxItems As Outlook.Items

Private Sub Application_Startup()
    Set objInboxItems = Outlook.Application.Session.GetDefaultFolder(olFolderInbox).Items
 
    Call DeleteEmailsFromSpecificSenderAfterXDays
End Sub

Private Sub objInboxItems_ItemAdd(ByVal Item As Object)
    Dim objMail As Outlook.MailItem
 
    If TypeOf Item Is MailItem Then
       Set objMail = Item
 
       'From the specific sender
       If objMail.SenderEmailAddress = "bob_black@datanumen.com" Then
          'Set expiry time - after 5 days
          objMail.ExpiryTime = objMail.ReceivedTime + 4
          objMail.Save
       End If
    End If
End Sub

Private Sub DeleteEmailsFromSpecificSenderAfterXDays()
    Dim strFilter As String
    Dim objExpiredItems As Outlook.Items
    Dim objExpiredMail As Outlook.MailItem
 
    strFilter = "[ExpiryTime] <= " & Chr(34) & Now & Chr(34)
 
    'Get all expired items
    Set objExpiredItems = objInboxItems.Restrict(strFilter)
 
    For i = objExpiredItems.Count To 1 Step -1
        If objExpiredItems(i).Class = olMail Then
           Set objExpiredMail = objExpiredItems(i)
 
           'Auto delete expired emails from the specific sender
           If objExpiredMail.SenderEmailAddress = "bob_black@datanumen.com" Then
              objExpiredMail.Delete
           End If
        End If
    Next
End Sub

VBA 코드-특정 일 이후 특정 보낸 사람의 이메일 자동 삭제

  1. 그 후, 입술tart Outlook에서이 매크로를 활성화합니다.
  2. 그 이후로 특정 발신자가 보낸 새 이메일이 Inbox에 도착할 때마다 특정 만료 시간 (수신 후 특정 날짜)이 할당됩니다.자동 추가 만료 시간
  3. 그런 다음 매번tart Outlook, Outlook은 특정 발신자로부터 만료 된 메일을 자동으로 확인하고 삭제합니다.특정 발신자가 보낸 만료 된 이메일 자동 삭제

손상 후 Outlook 데이터 복원

Outlook에서 다양한 오류와 문제가 발생했을 수 있습니다. 그렇다면 Outlook 손상에 직면 한 적이 있습니까? 예를 들어 Outlook을 자주 잘못 종료하면 PST 파일이 손상되는 경향이 있습니다. 일반적으로 이러한 경우 백업에서 Outlook 데이터를 검색하도록 선택할 수 있습니다. 또는 사용할 수 있습니다 받은 편지함 수리 도구 또는 다음과 같은 신뢰할 수있는 외부 도구 DataNumen Outlook Repair.

저자 소개 :

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

지금 공유 :

댓글이 닫혀있다.