Excel VBA를 사용하여 Outlook에서 대량 이메일을 보내는 방법

클라이언트, 고객, 친구 또는 기타 연락처에 개인화된 대량 이메일을 전달해야 합니까? 한 번의 클릭으로 그렇게 하시겠습니까? 가능합니다! Microsoft Excel 에는 이러한 모든 작업을 수행하는 마법 같은 도구가 있습니다 . Visual Basic for Applications 일명 Excel VBA입니다.

Excel VBA를 사용하여 Outlook에서 대량 이메일을 보내는 방법을 알아 보려면 계속 읽으십시오 . 더있다! 아래 자습서에 언급된 가장 간단한 단계를 따라 연습할 수 있습니다. 파헤쳐 보자!

Excel VBA를 사용하여 Outlook에서 대량 이메일을 보내는 방법

현재 자습서에서는 Excel에서 대량 전자 메일을 자동화하는 데 필요한 VBA 코드를 제공합니다. 하나의 Excel 파일에 데이터를 수집하고 몇 가지 빠른 서식을 수행하기만 하면 됩니다.

실행할 VBA 프로그램은 Microsoft Outlook을 이메일 전송 앱으로 사용합니다. 따라서 컴퓨터에 Outlook을 설치하고 구성해야 합니다. VBA 코드는 웹 브라우저 기반 Outlook 프로그램을 사용할 수 없습니다.

Excel 파일 및 Outlook 앱을 사용할 준비가 되면 다음 단계를 수행합니다.

• 대량 이메일 워크시트를 6열로 구성합니다.
• 행 A1에 열 머리글을 입력합니다. 이메일 수신(A); 이메일 참조(B); 이메일 제목(C); 이메일 본문(D), 첨부파일(E), 상태(F).
• 열 A 머리글 아래에 모든 "받는 사람 주소"를 추가합니다 . 원하는 경우 수천 개의 이메일을 추가할 수 있습니다.
• 마찬가지로 B 열 제목 아래에 "CC 주소"를 입력합니다.
• 이메일 제목을 개인화할 때입니다. 열 C 제목 아래에 각 연락처에 대한 사용자 정의 이메일 제목을 추가할 수 있습니다.
• 이메일 본문 내용도 마찬가지입니다. 열 D 제목 아래의 행에 이메일 콘텐츠를 복사하여 붙여넣습니다 .
• 열 E 제목 아래에 파일 첨부 위치를 복사하여 붙여넣습니다.
• 첨부 파일 위치를 얻으려면 Shift 키를 누르고 컴퓨터에서 대상 파일을 선택하십시오.
• 이제 마우스 오른쪽 버튼을 클릭 하고 경로로 복사를 선택하여 PC 클립보드에 파일 주소를 복사합니다.
• 이제 주소를 E 열의 행에 직접 붙여넣을 수 있습니다.
• VBA 코드가 상태를 자동으로 채우므로 F 열을 비워 둡니다 .

• Excel 시트를 매크로 지원 파일로 저장합니다.
• 이제 Alt+F11을 눌러 VBA 코드 편집기를 불러옵니다.
• 상단 메뉴에서 도구를 클릭 한 다음 참조를 선택합니다 .
• 다음 목록에서 Microsoft Office 16.0 개체 라이브러리를 찾아 확인란을 선택합니다 .
• 확인을 클릭하여 Outlook을 VBA용 개체로 저장합니다.

• 이제 삽입을 클릭한 다음 모듈을 선택하여 코드 편집기를 엽니다.
• Module 에 아래 언급된 코드를 복사하여 붙여넣으십시오 .

Sub Send_Bulk_Mails() Dim sh As Worksheet Set sh = ThisWorkbook.Sheets("Worksheet_Name") Dim i As Integer Dim OA As Object Dim msg As Object Set OA = CreateObject("outlook.application") Dim last_row As Integer last_row = 응용 프로그램. CountA(sh.Range("A:A")) For i = 2 to last_row Set msg = OA.createitem(0) msg.to = sh.Range("A" & i).Value msg.cc = sh. Range("B" & i).Value msg.Subject = sh.Range("C" & i).Value msg.body = sh.Range("D" & i).Value If sh.Range("E" & i).Value <> "" Then msg.attachments.Add sh.Range("E" & i).Value End If msg.send sh.Range("F" & i).Value = "Sent" 다음 i MsgBox "모든 이메일이 전송되었습니다" End Sub

• (" Worksheet_Name ") 코드 라인 3에 밑줄로 구분된 현재 워크시트 이름을 입력합니다 .
• 메뉴에서 저장을 클릭하여 스크립트를 저장합니다.
• F5 키를 눌러 매크로를 실행하면 Excel이 자동으로 Outlook을 통해 전자 메일을 보냅니다.

• 나중에 Excel 리본 메뉴의 개발자 탭 에서 이 매크로에 액세스할 수도 있습니다 .

결론

이제 Excel VBA 자습서를 사용하여 Outlook에서 대량 이메일을 보내는 방법을 따라했으므로 수동 이메일 전송에 시간을 낭비하지 않고 쉽게 대량 이메일을 보낼 수 있습니다.

Excel에 대한 또 다른 VBA 요령을 배우고 싶습니까? 이 자습서를 통해 VBA를 사용하여 Excel에서 맞춤법 검사를 자동화하는 방법을 알아보세요 .