Outlook에서 특정 이메일 주소로 이메일을 보내는 것을 방지하는 방법

지금 공유 :

많은 사용자가 실수로 Outlook의 특정 전자 메일 주소로 전자 메일을 보내는 것을 차단하려고합니다. 따라서이 기사에서는이를 실현하는 방법을 소개합니다.

Outlook은 특정 이메일 주소로의 이메일 수신을 차단하는 기본 기능을 제공하지 않습니다. 따라서 이를 구현하려면 스크립트를 작성해야 합니다. 다음은 그러한 VBA 코드의 일부입니다. VBA 사용법을 모르시는 분은 이전 게시물("VBA 사용법")을 참조하세요.Outlook에서 VBA 코드를 실행하는 방법".

특정 이메일 주소로 이메일 전송 방지

  1. 처음에는 "Alt + F11"을 통해 Outlook VBA 편집기에 액세스합니다.
  2. 그런 다음 "ThisOutlookSession"프로젝트에 다음 코드를 입력하십시오.
Private Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)
    Dim objMail As Outlook.MailItem
    Dim objRecipients As Outlook.Recipients
    Dim ContactGroupFound As Boolean
    Dim i, n As Long
    Dim objRecipient As Outlook.Recipient
 
    If TypeOf Item Is MailItem Then
       Set objMail = Item
 
       'Expand the contact groups in Recipients
       ContactGroupFound = True
       Do While ContactGroupFound = True
          Set objRecipients = objMail.Recipients
          ContactGroupFound = False
 
          For i = objRecipients.Count To 1 Step -1
              If objRecipients(i).AddressEntry.DisplayType <> olUser Then
                 For n = 1 To objRecipients(i).AddressEntry.Members.Count
                     If objRecipients(i).AddressEntry.Members.Item(n).DisplayType = olUser Then
                        objMail.Recipients.Add (objRecipients(i).AddressEntry.Members.Item(n).Address)
                     Else
                        objMail.Recipients.Add (objRecipients(i).AddressEntry.Members.Item(n).Name)
                        ContactGroupFound = True
                     End If
                 Next
                 objRecipients(i).Delete
              End If
          Next i
          objRecipients.ResolveAll
       Loop
 
       'Remove specific email address
       For Each objRecipient In objRecipients
           If objRecipient.Address = "shelly@datanumen.com" Then
              If MsgBox("Do you want to email to " & Chr(34) & "shelly@datanumen.com" & Chr(34) & "?", vbExclamation + vbYesNo) = vbNo Then
                 objRecipient.Delete
              End If
           End If
       Next
    End If
End Sub

VBA 코드-특정 이메일 주소로 이메일 전송 방지

  1. 그런 다음 "Microsoft Visual Basic for Applications"창을 종료합니다.
  2. 결국 다음 단계에 따라 시도해보십시오.
  • 먼저 이메일을 작성하고 수신자를 입력하십시오.
  • 그런 다음 "보내기"버튼을 클릭합니다.
  • 한 번에 매크로는 수신자의 연락처 그룹을 확장하고 수신자가 특정 이메일 주소를 포함하는지 확인합니다.
  • 주소를 찾으면 다음 그림과 같이 메시지가 표시됩니다.확인 메시지
  • "아니오"를 선택하면 특정 이메일 주소가 즉시 삭제됩니다.
  • 메일이 전송 된 후 특정 이메일 주소가 포함되지 않은 수신자를 확인할 수 있습니다.특정 이메일 주소가 제거되었습니다.

손상된 Outlook 파일 복구

Outlook 파일이 손상된 적이 있으신가요? Outlook에서 가장 성가신 문제 중 하나임은 분명합니다. 이런 문제가 발생하면 파일을 복구하기 위해 여러 가지 방법을 시도해야 합니다. PST 수리, 약간 매듭입니다. 평소처럼 처음으로 Scanpst를 사용하는 것에 대해 생각할 것입니다. 그러나 불행히도 그러한 경우에는 실패 할 수 있습니다. 리조트는 다음과 같이 경험이 더 많은 도구 여야합니다. DataNumen Outlook Repair, 또는 전문 PST 복구 서비스.

저자 소개 :

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

지금 공유 :

댓글이 닫혀있다.