특정 도메인의 모든 연락처에 이메일을 일괄 전송하는 방법

Outlook 솔루션 2025 년 9 월 29 일

때때로 특정 도메인의 모든 연락처에 이메일을 일괄 적으로 보낼 수 있습니다. 이 경우이 기사에서 소개 한 방법을 사용하여 신속하게 얻을 수 있습니다.

어떤 이유로 Outlook의 특정 도메인에있는 모든 연락처로 전자 메일을 보내야 할 수도 있습니다. 예를 들어, 이메일 주소가 특정 이메일 도메인에있는 모든 동료에게 이메일을 보내야합니다. 이 연락처를 수동으로 찾으면 상당히 번거로울 것입니다. 따라서 여기서 우리는 그것을 얻는 빠른 방법을 소개합니다. 다음은 세부 단계 및 VBA 코드입니다.

특정 도메인의 모든 연락처에 이메일 일괄 전송

먼저 Outlook 응용 프로그램을 시작하십시오.
그런 다음 "Alt + F11"키 버튼을 눌러 Outlook VBA 편집기에 액세스합니다.
다음으로 사용하지 않는 모듈을 열거 나 곧바로 새 모듈을 삽입해야합니다.
그런 다음 다음 VBA 코드를 복사하여 붙여 넣으십시오.

Sub SendanEmailtoAllContactsinSpecificDomain()
    Dim objContactsFolder As Outlook.Folder
    Dim objItem As Object
    Dim objContact As Outlook.ContactItem
    Dim strEmail1Address, strEmail2Address, strEmail3Address As String
    Dim objMail As Outlook.MailItem
    Dim objMailRecipients As Outlook.Recipients
 
    Set objMail = Application.CreateItem(olMailItem)
    Set objMailRecipients = objMail.Recipients
    Set objContactsFolder = Application.Session.GetDefaultFolder(olFolderContacts)
 
    For Each objItem In objContactsFolder.Items
        If objItem.Class = olContact Then
           Set objContact = objItem
           strEmail1Address = objContact.Email1Address
           strEmail2Address = objContact.Email2Address
           strEmail3Address = objContact.Email3Address

           'Change the specific email domain
           If InStr(strEmail1Address, "@datanumen.com") > 0 Then
              objMail.Recipients.Add (strEmail1Address)
           ElseIf InStr(strEmail2Address, "@datanumen.com") > 0 Then
              objMail.Recipients.Add (strEmail2Address)
           ElseIf InStr(strEmail3Address, "@datanumen.com") > 0 Then
              objMail.Recipients.Add (strEmail3Address)
           End If
 
        End If
    Next objItem
 
    objMail.Display
End Sub

그런 다음 Outlook 매크로 보안 수준을 낮음으로 변경해야합니다.
선택적으로 이러한 이메일을 자주 보내야하는 경우 빠른 실행 도구 모음에 새 매크로를 추가하는 것이 좋습니다.
이 시점에서 시도해 볼 수 있습니다. 툴바에서 "실행"아이콘을 클릭합니다.
결국 새 이메일이 나타납니다. 다음 스크린 샷과 같이 특정 이메일 도메인에있는 모든 이메일 주소가 "받는 사람"필드에 포함 된 것을 확인할 수 있습니다.

PST 오류에 당황하지 마십시오

사용자는 액세스 할 수없는 PST 오류, 바이러스에 감염된 PST 파일 또는 손상된 Outlook PST data, etc. However, it is wise to calm down and try best to resolve it as soon as possible. First of all, you can try restarting Outlook. If issues persist, you can recur to the inbox repair tool, Scanpst.exe. But, assuming that it cannot make any effects, you can take recourse to a more experienced tool, like DataNumen Outlook Repair.

저자 소개 :

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