연락처 그룹에 Outlook 전자 메일을 보낼 때 특정 구성원에게 배달을 지연하는 방법

Outlook 솔루션 2025 년 9 월 29 일
지금 공유 :

이 기사에서는 Outlook의 연락처 그룹에 전자 메일을 보낼 때 특정 구성원에 대한 배달을 신속하게 지연 할 수있는 VBA 코드를 공유합니다.

Outlook 이메일을 작성하여 연락처 그룹에 보낼 때이 이메일을이 그룹의 특정 구성원에게 보내는 것을 연기하려면 다음 방법을 사용하여이를 실현할 수 있습니다. 자동으로 연락처 그룹을 확장하고 특정 회원에게 지연되는 동일한 이메일을 생성합니다. 이제 정교한 단계를 알아 보려면 계속 읽으십시오.

연락처 그룹에 Outlook 전자 메일을 보낼 때 특정 구성원에 대한 배달 지연

연락처 그룹에 이메일을 보낼 때 특정 회원에게 전달 지연

  1. 먼저 Outlook 프로그램을 실행하세요.
  2. 그런 다음 나타나는 Outlook 주 창에서 "Alt + F11"키 버튼을 눌러야합니다.
  3. 그런 다음 새 모듈을 삽입하거나 사용하지 않는 모듈을 열어야하는 Outlook VBA 편집기에 액세스 할 수 있습니다.
  4. 그런 다음이 모듈에 다음 VBA 코드를 복사하여 붙여 넣을 수 있습니다.
Sub DelayEmail_aSpecificMemberinContactGroup()
    Dim objCurrentMail As MailItem
    Dim objRecipients As Recipients
    Dim ContactGroupFound As Boolean
    Dim i, n As Long
    Dim objDelayedMail As MailItem
 
    Set objCurrentMail = ActiveInspector.CurrentItem
    ContactGroupFound = True
 
    While ContactGroupFound = True
          Set objRecipients = objCurrentMail.Recipients
          ContactGroupFound = False
 
          'Expand the contact group in "To" field
          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
                        objCurrentMail.Recipients.Add (objRecipients(i).AddressEntry.Members.Item(n).Address)
                     Else
                        objCurrentMail.Recipients.Add (objRecipients(i).AddressEntry.Members.Item(n).Name)
                        ContactGroupFound = True
                     End If
                 Next
                 objRecipients(i).Delete
              End If
          Next i
          objRecipients.ResolveAll
    Wend

    'Find the specific memebr in the recipients
    For Each objRecipient In objRecipients
        If objRecipient.Address = "shelly@datanumen.com" Then
 
           'Create a same email
           Set objDelayedMail = objCurrentMail.Copy
           With objDelayedMail
                .To = ""
                .Recipients.Add objRecipient.Address
                .Recipients.ResolveAll
                'Change the deferred delivery time as per your needs
                .DeferredDeliveryTime = (Date + 1) & " 09:00:00"
                .Send
          End With
 
          objRecipient.Delete
       End If
    Next
 
    objCurrentMail.Send
End Sub

VBA 코드-연락처 그룹에 Outlook 전자 메일을 보낼 때 특정 구성원에게 배달 지연

  1. 다음으로 나중에 편리한 액세스를 위해 새로 추가 된 매크로를 메시지 창의 빠른 액세스 도구 모음에 추가하는 것이 좋습니다.
  2. 그런 다음 "Trust Center"의 "매크로 설정"에서 모든 매크로를 활성화하도록 Outlook 매크로 설정을 변경해야합니다.
  3. 결국 한 번 찍을 수 있습니다.
  • 먼저 평소와 같이 연락처 그룹에 이러한 이메일을 작성하십시오.
  • 그런 다음 빠른 실행 도구 모음에서 새 매크로 버튼을 클릭 할 수 있습니다.
  • 한 번에 동일한 이메일이 생성되고 예정된 시간에 특정 회원에게 발송되도록 설정됩니다.
  • 그 동안 현재 이메일이 연락처 그룹의 나머지 구성원에게 발송됩니다.

전망과 관련된 모든 위험을 주시하십시오.

현대 사회에서 바이러스와 스파이웨어는 점점 더 만연하고 있습니다. 이러한 악성 프로그램은 대개 무해한 이메일로 위장합니다. 따라서 Outlook을 사용하는 동안 악성 이메일과 같은 다양한 위험에 주의해야 합니다. 알 수 없는 발신자로부터 온 이메일은 특히 조심해야 합니다. 또한, Outlook 수정 PST 파일이 멀웨어의 공격을받는 즉시 다음과 같은 숙련 된 복구 도구를 준비해야합니다. DataNumen Outlook Repair.

저자 소개 :

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

지금 공유 :

댓글이 닫혀있다.