Outlook VBA를 통해 특정 도메인에있는 보낸 사람의 모든 첨부 파일을 자동 저장하는 방법

지금 공유 :

Outlook에서 특정 도메인에있는 전자 메일 주소를 가진 보낸 사람의 모든 첨부 파일을 자동으로 저장하도록하려면이 문서를 읽을 수 있습니다. 여기서는 빠른 방법을 소개합니다.

회사의 모든 직원이 동일한 도메인에있는 이메일 주소를 사용할 수 있습니다. 다양한 첨부 파일이있는 전자 메일을 자주 보내므로 Outlook에서 이러한 전자 메일의 첨부 파일을 자동으로 저장하도록 할 수 있습니다. 이 경우 Outlook은 전자 메일의 보낸 사람 도메인을 자동으로 확인하고 첨부 파일을 자동으로 저장해야합니다. 이제 다음에서는 쉽게 구현할 수있는 VBA 코드를 공유합니다.

특정 도메인에있는 보낸 사람의 모든 첨부 파일 자동 저장

  1. 처음에는 "에 따라 Outlook VBA 편집기를 실행하십시오.Outlook에서 VBA 코드를 실행하는 방법".
  2. 그런 다음 사용하지 않는 모듈에 다음 코드를 넣으십시오.
Public WithEvents objInboxItems As Outlook.Items

Private Sub Application_Startup()
   Set objInboxItems = Session.GetDefaultFolder(olFolderInbox).Items
End Sub

Private Sub objInboxItems_ItemAdd(ByVal Item As Object)
   Dim objMail As Outlook.MailItem
   Dim strSenderAddress As String
   Dim strSenderDomain As String
   Dim objAttachment As Attachment
   Dim strFolderPath As String
   Dim strFileName As String

   If Item.Class = olMail Then
      Set objMail = Item

      'Get sender domain
      strSenderAddress = objMail.SenderEmailAddress
      strSenderDomain = Right(strSenderAddress, Len(strSenderAddress) - InStr(strSenderAddress, "@"))

      'Change to the specific domain as per your needs
      If strSenderDomain = "datanumen.net" Then
         If objMail.Attachments.Count > 0 Then
            For Each objAttachment In objMail.Attachments
                'Change the folder path where you want to save attachments
                strFolderPath = "E:\Attachments\"
                strFileName = objMail.Subject & " " & Chr(45) & " " & objAttachment.FileName
                objAttachment.SaveAsFile strFolderPath & strFileName
            Next
         End If
      End If
   End If
End Sub

VBA 코드-특정 도메인에있는 보낸 사람의 모든 첨부 파일 자동 저장

  1. 그 후, 입술tart Outlook에서이 매크로를 활성화합니다.
  2. 그 이후로 수신 전자 메일이받은 편지함에 도착할 때마다 Outlook은 보낸 사람 도메인을 자동으로 확인합니다. 미리 정의 된 도메인과 동일하고 첨부 파일이 포함 된 경우 Outlook은 첨부 파일을 특정 로컬 폴더에 자동으로 저장합니다.자동 저장된 첨부 파일

알 수없는 도메인에있는 보낸 사람의 첨부 파일을 열지 않음

알 수없는 도메인에있는 첨부 파일을 쉽게 신뢰하고 다운로드하지 않는 것이 좋습니다. 멀웨어 나 바이러스가 감염 될 수 있기 때문입니다. 일단 열면 Outlook 파일이 공격받을 수 있습니다. 즉, Outlook 파일이 손상 될 수 있습니다. 그 당시에도 스캔프스트 당신을 도울 수 없습니다. 유일한 리조트는 더 강력한 도구 또는 전문 PST 복구 서비스입니다.

저자 소개 :

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

지금 공유 :

댓글이 닫혀있다.