많은 사용자가 실수로 Outlook의 특정 전자 메일 주소로 전자 메일을 보내는 것을 차단하려고합니다. 따라서이 기사에서는이를 실현하는 방법을 소개합니다.
Outlook은 특정 이메일 주소로의 이메일 수신을 차단하는 기본 기능을 제공하지 않습니다. 따라서 이를 구현하려면 스크립트를 작성해야 합니다. 다음은 그러한 VBA 코드의 일부입니다. VBA 사용법을 모르시는 분은 이전 게시물("VBA 사용법")을 참조하세요.Outlook에서 VBA 코드를 실행하는 방법".
특정 이메일 주소로 이메일 전송 방지
- 처음에는 "Alt + F11"을 통해 Outlook VBA 편집기에 액세스합니다.
- 그런 다음 "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
- 그런 다음 "Microsoft Visual Basic for Applications"창을 종료합니다.
- 결국 다음 단계에 따라 시도해보십시오.
- 먼저 이메일을 작성하고 수신자를 입력하십시오.
- 그런 다음 "보내기"버튼을 클릭합니다.
- 한 번에 매크로는 수신자의 연락처 그룹을 확장하고 수신자가 특정 이메일 주소를 포함하는지 확인합니다.
- 주소를 찾으면 다음 그림과 같이 메시지가 표시됩니다.
- "아니오"를 선택하면 특정 이메일 주소가 즉시 삭제됩니다.
- 메일이 전송 된 후 특정 이메일 주소가 포함되지 않은 수신자를 확인할 수 있습니다.
손상된 Outlook 파일 복구
Outlook 파일이 손상된 적이 있으신가요? Outlook에서 가장 성가신 문제 중 하나임은 분명합니다. 이런 문제가 발생하면 파일을 복구하기 위해 여러 가지 방법을 시도해야 합니다. PST 수리, 약간 매듭입니다. 평소처럼 처음으로 Scanpst를 사용하는 것에 대해 생각할 것입니다. 그러나 불행히도 그러한 경우에는 실패 할 수 있습니다. 리조트는 다음과 같이 경험이 더 많은 도구 여야합니다. DataNumen Outlook Repair, 또는 전문 PST 복구 서비스.
저자 소개 :
Shirley Zhang은 데이터 복구 전문가입니다. DataNumen, Inc.는 다음과 같은 데이터 복구 기술 분야의 세계적 리더입니다. SQL 수리 및 전망 수리 소프트웨어 제품. 자세한 내용은 WWW.datanumen.COM


