Outlook 전자 메일을 작성할 때 "받는 사람"필드의 모든 연락처 그룹을 일괄 확장하는 방법

지금 공유 :

많은 사용자들이 Outlook 이메일을 작성할 때 "받는 사람" 필드에 모든 연락처 그룹을 일괄적으로 추가할 수 있는 방법을 원합니다. 따라서 이 글에서는 그러한 방법을 공유하겠습니다.

일반적으로 "받는 사람"필드에서 연락처 그룹을 확장하려면 그룹 이름 앞에있는 "+"아이콘을 클릭합니다. 그러나 이렇게하면 "받는 사람"필드에 많은 연락처 그룹이 있고 모두 확장하려는 경우 약간 지루합니다. 따라서 여기에서는 클릭 한 번으로 "받는 사람"필드의 모든 그룹을 빠르게 확장하는 방법을 알려 드리겠습니다.

Outlook 전자 메일을 작성할 때 "받는 사람"필드의 모든 연락처 그룹 일괄 확장

"받는 사람"필드의 모든 연락처 그룹 일괄 확장

  1. 먼저 Outlook 프로그램을 시작하십시오.
  2. 그런 다음 기본 Outlook 창에서 "Alt + F11"키 버튼을 누릅니다.
  3. 다음으로 사용하지 않는 모듈에 액세스하거나 새 모듈을 삽입해야하는 VBA 편집기 화면으로 이동합니다.
  4. 그런 다음 다음 VBA 코드를이 모듈에 복사합니다.
Sub ExpandAllContactGroupsInToField()
    Dim objMail As Outlook.MailItem
    Dim objRecipients As Outlook.Recipients
    Dim bContactGroupFound As Boolean
    Dim i As Long
 
    'Get the current mail
    Set objMail = ActiveInspector.CurrentItem
    bContactGroupFound = True
 
    Do While bContactGroupFound = True
       Set objRecipients = objMail.Recipients
       bContactGroupFound = False
 
       'Expand all contact groups in "To" field
       For i = objRecipients.Count To 1 Step -1
           If objRecipients(i).Type = olTo Then
              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)
                        bContactGroupFound = True
                     End If
                 Next
                 objRecipients(i).Delete
              End If
          End If
      Next i
      objRecipients.ResolveAll
    Loop
End Sub

VBA 코드- "받는 사람"필드의 모든 연락처 그룹 일괄 확장

  1. 그런 다음 오른쪽 상단 모서리에있는 십자 아이콘을 클릭하여 현재 창을 종료 할 수 있습니다.
  2. 나중에이 VBA 프로젝트를 메시지 창의 빠른 실행 도구 모음에 추가해야합니다.
  • 먼저 새 메일을 작성하십시오.
  • 그런 다음 왼쪽 상단 모서리에있는 아래쪽 화살표를 클릭합니다.
  • 다음으로 "추가 명령"을 선택합니다.
  • 새 대화 상자에서 아래 이미지에 표시된 단계를 수행하여 빠른 실행 도구 모음에 매크로 추가를 완료 할 수 있습니다.이 VBA 프로젝트를 메시지 창의 빠른 실행 도구 모음에 추가하십시오.
  1. 마지막으로 촬영할 수 있습니다.
  • 우선 평소처럼 새 이메일을 작성하세요.
  • 그런 다음 "받는 사람"필드에 여러 연락처 그룹을 추가합니다.
  • 그런 다음 빠른 실행 도구 모음에서 매크로 버튼을 클릭 할 수 있습니다.매크로 실행
  • 한 번에 모든 연락처 그룹이 다음 이미지와 같이 확장됩니다.확장 된 연락처 그룹

Outlook 데이터를 적시에 구하십시오

일반적으로 Outlook의 문제에 직면하자마자받은 편지함 복구 도구가 처음부터 마음에 떠오를 것입니다. 그러나 종종 효과가 없을 것입니다. 그런 경우에는 다음과 같이 더 강력하고 신뢰할 수있는 유틸리티로 되풀이하는 것이 좋습니다. DataNumen Outlook Repair. 그것은 수 PST 수정 PST 파일이 얼마나 심하게 손상되었는지에 관계없이 즉시 파일을 생성합니다.

저자 소개 :

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

지금 공유 :

댓글이 닫혀있다.