사용자가 고객이나 상사에게 이메일을 보낼 때 추적하기가 매우 어렵습니다. 이럴 때 엑셀이 유용합니다. 따라서 "Excel에서 자동 이메일 보내기 Outlook”으로 시간을 절약할 수 있는 방법으로 입증되었습니다. Excel VBA 매크로 및 HYPERLINK 기능은 자동 이메일을 보내거나 Excel 항목을 사용하여 초안을 만들 수 있습니다.
직원 급여가 있다고 가정해 보겠습니다. Excel의 데이터와 Outlook을 사용하여 자동 이메일을 보내려고 합니다. .
이 문서에서는 VBA 매크로의 여러 변형을 보여줍니다. 및 HYPERLINK Excel에서 자동 이메일을 보내는 기능 Outlook으로 .
Excel 통합 문서 다운로드
⧭ Microsoft Visual Basic 열기 및 모듈에 코드 삽입
방법을 시연하기 전에 모듈을 열고 삽입하는 방법을 알아야 합니다. Microsoft Visual Basic에서 엑셀에서.
🔄 Microsoft Visual Basic 열기: 주로 3 Microsoft Visual Basic을 여는 방법 창.
1. 키보드 단축키 사용: ALT+F11 누르기 Microsoft Visual Basic을 열려면 창.
2. 개발자 탭 사용: Excel 워크시트에서 개발자 탭으로 이동합니다.> Visual Basic 선택 . Microsoft Visual Basic 창이 나타납니다.
3. 워크시트 탭 사용: 워크시트로 이동하여 오른쪽 클릭> 코드 보기 선택 (컨텍스트에서 메뉴 ).
🔄 Microsoft Visual Basic에 모듈 삽입: 2가 있습니다. 모듈을 삽입하는 방법 Microsoft Visual Basic에서 창,
1. 시트 옵션 사용: Microsoft Visual Basic을 연 후 창에서 워크시트를 선택합니다.> 오른쪽 클릭 그것에> 선택 삽입 (컨텍스트 메뉴에서 )> 모듈을 선택합니다. .
2. 툴바 사용: 삽입을 선택하여 수행할 수도 있습니다. (도구 모음에서 )> 모듈 선택 .
Excel에서 Outlook으로 자동 이메일을 보내는 4가지 쉬운 방법
방법 1:VBA 매크로를 사용하여 Outlook을 사용하여 선택한 수신자에게 자동으로 이메일 보내기
매크로 실행 버튼을 만들고 싶습니다. 클릭 한 번으로 선택한 수신자에게 간단히 메일을 보낼 수 있습니다.
1단계: 삽입으로 이동 탭> 도형> 제공된 모양 중 하나를 선택합니다(예:직사각형:둥근 모서리 ).
2단계: 더하기 아이콘 드래그 도형을 삽입할 위치 아래 이미지와 같이
3단계: 선호하는 도형 채우기 선택 및 개요 색상 그런 다음 그것을 마우스 오른쪽 버튼으로 클릭하십시오. 텍스트 수정을 클릭합니다. 텍스트를 삽입합니다.
4단계: 지침 사용 Microsoft Visual Basic 열기 모듈 삽입 . 모듈에 다음 매크로를 붙여넣습니다. .
Sub ExcelToOutlookSR()
Dim mApp As Object
Dim mMail As Object
Dim SendToMail As String
Dim MailSubject As String
Dim mMailBody As String
For Each r In Selection
SendToMail = Range("C" & r.Row)
MailSubject = Range("F" & r.Row)
mMailBody = Range("G" & r.Row)
Set mApp = CreateObject("Outlook.Application")
Set mMail = mApp.CreateItem(0)
With mMail
.To = SendToMail
.Subject = MailSubject
.Body = mMailBody
.Display ' You can use .Send
End With
Next r
End Sub
➤ 코드에서
1 – 변수를 Object로 선언하여 매크로 프로시저를 시작합니다. 및 문자열 .
2 – VBA FOR 실행 이메일의 보내기를 할당하기 위해 선택 항목의 각 행에 대해 루프 , 제목 , 및 본문 행 항목 사용.
3 – 변수를 할당합니다.
4 – VBA 수행 Outlook을 채우는 문 보내기와 같은 항목 , 메일 제목 등. 여기서 매크로는 디스플레이만 실행합니다. Outlook을 불러오는 명령 이메일 초안으로. 그러나 보내기 명령은 표시 위치 또는 뒤에 사용됩니다. 전망 생성된 이메일을 선택한 수신자에게 보냅니다.
5 – VBA FOR 완료 루프.
5단계: 워크시트로 돌아갑니다. 도형을 마우스 오른쪽 버튼으로 클릭합니다. 그런 다음 매크로 할당을 선택합니다. 컨텍스트 메뉴에서 옵션.
6단계: 매크로 선택(예:ExcelToOutlookSR ) 매크로 이름 아래 매크로 입력을 선택합니다. 이 통합 문서로 옵션 . 확인을 클릭합니다. .
7단계: 이제 워크시트에서 직원을 한 명 이상 선택한 다음 모양 버튼을 클릭합니다. .
8단계: Excel 프롬프트 Outlook 점심을 먹고 선택한 직원에게 이메일을 만들거나 보냅니다. 두 명의 직원을 선택하면 Outlook 보낼 준비가 된 두 개의 다른 이메일 초안을 생성합니다.
매크로는 디스플레이만 제공하므로 명령, Outlook 보내지 않고 이메일 초안만 표시합니다. 보내기 사용 Excel에서 자동으로 이메일을 보내는 명령 Outlook으로 셀 항목을 사용합니다.
자세히 알아보기: 이메일을 자동으로 보내는 Excel 매크로(적합한 3가지 예)
방법 2:특정 셀 값에 따라 Excel에서 Outlook으로 자동으로 이메일 보내기
Excel에서 목표를 달성한 후 자동 이메일을 보내려면 어떻게 해야 하나요? Outlook으로 ? 매크로 코드는 이 작업을 쉽게 수행할 수 있습니다.
분기별 판매 데이터 가 있다고 가정해 보겠습니다. 아래 그림과 같이 목표(예:판매> 2000)를 달성한 후 ) 자동으로 Outlook을 표시합니다. Excel에서 할당된 이메일 ID로 이메일을 보냅니다.
1단계: 모듈에 다음 매크로 코드를 입력합니다. .
Option Explicit
Dim Rng As Range
Sub Worksheet_Change(ByVal mRng As Range)
On Error Resume Next
If mRng.Cells.Count > 1 Then Exit Sub
Set Rng = Intersect(Range("F17"), mRng)
If Rng Is Nothing Then Exit Sub
If IsNumeric(mRng.Value) And Target.Value > 2000 Then
Call ExcelToOutlook
End If
End Sub
Sub ExcelToOutlook()
Dim mApp As Object
Dim mMail As Object
Dim mMailBody As String
Set mApp = CreateObject("Outlook.Application")
Set mMail = mApp.CreateItem(0)
mMailBody = "Greetings Sir" & vbNewLine & vbNewLine & _
"Our outlet has quarterly Sales more than the target." & vbNewLine & _
"It's a confirmation mail." & vbNewLine & vbNewLine & _
"Regards" & vbNewLine & _
"Outlet Team"
On Error Resume Next
With mMail
.To = "[email protected]"
.CC = ""
.BCC = ""
.Subject = "Notification on Achieving Sales Target"
.Body = mMailBody
.Display 'or you can use .Send
End With
On Error GoTo 0
Set mMail = Nothing
Set mApp = Nothing
End Sub
➤ 위 이미지의 섹션에서
1 – 셀 할당(예:F17 ) 범위 내에서 VBA IF 실행 성명. 문이 True인 경우 , 매크로는 실행을 위해 다른 매크로를 호출합니다.
2 – 변수 유형을 선언하고 할당하여 Outlook을 채웁니다. 님의 항목입니다.
3 – VBA와 함께 수행 이메일 항목에 변수를 할당하는 문. 보내기 사용 표시 대신 명령 이메일을 검토하지 않고 직접 보내려는 경우. 수신자 이메일은 매크로 내에 삽입됩니다. 수신자의 이메일 ID를 자동으로 삽입하려면 다른 방법을 사용하세요.
4 – 할당에서 특정 변수를 지웁니다.
2단계: F5 키를 사용합니다. 매크로를 실행하는 키입니다. 잠시 후 Excel에서 Outlook을 가져옵니다. 다음과 같이 자동으로 생성된 초안 이메일로 보내기를 클릭할 수 있습니다. 또는 보내기 를 사용하여 자동 전송 매크로의 명령입니다.
자세히 알아보기: 셀 콘텐츠를 기반으로 Excel에서 자동으로 이메일 보내기(2가지 방법)
유사한 수치
- 공유 Excel 파일에 누가 있는지 확인하는 방법(빠른 단계 사용)
- Excel에서 통합 문서 공유 활성화
- 여러 사용자를 위해 Excel 파일을 공유하는 방법
- 첨부 파일이 있는 Excel에서 이메일을 보내기 위해 매크로를 적용하는 방법
방법 3:VBA 매크로를 사용하여 Outlook의 Excel에서 활성 워크시트가 포함된 이메일 보내기
또는 전체 활성 시트를 보내야 하는 경우가 있을 수 있습니다. 할당된 이메일 주소로 이 경우 VBA 사용자 정의 함수를 사용할 수 있습니다. 매크로 내에서 호출됩니다.
1단계: 모듈에 아래 매크로 삽입 .
Function ExcelOutlook(mTo, mSub As String, Optional mCC As String, Optional mBd As String) As Boolean
On Error Resume Next
Dim mApp As Object
Dim rItem As Object
Set mApp = CreateObject("Outlook.Application")
Set rItem = mApp.CreateItem(0)
With rItem
.To = mTo
.CC = ""
.Subject = mSub
.Body = mBd
.Attachments.Add ActiveWorkbook.FullName
.Display 'or you can use .Send
End With
Set rItem = Nothing
Set mApp = Nothing
End Function
Sub OutlookMail()
Dim mTo As String
Dim mSub As String
Dim mBd As String
mTo = "[email protected]"
mSub = "Quarterly Sales Data"
mBd = "Greetings Sir" & vbNewLine & vbNewLine & _
"Kindly find Outlet's Quarterly Sales data attached with this mail." & vbNewLine & _
"It's a notification mail." & vbNewLine & vbNewLine & _
"Regards" & vbNewLine & _
"Outlet Team"
If ExcelOutlook(mTo, mSub, , mBd) = True Then
MsgBox "Successfully created the Mail draft or Sent"
End If
End Sub
➤ 위 이미지에서 코드 섹션,
1 – 변수를 선언하고 설정합니다.
2 – VBA With를 사용하여 명령 할당 성명. 디스플레이 사용 또는 보내기 각각 이메일을 검토하거나 직접 보내는 명령입니다.
3 – 이전에 설정한 변수를 지웁니다.
4 – VBA 사용 할당 텍스트와 함께 명령.
5 – VBA 사용자 정의 기능 실행 .
2단계: 매크로를 실행하려면 F5 키를 누릅니다. , Excel에서 즉시 Outlook 아래 이미지와 유사한 검토를 위해 초안 이메일과 함께. 그 후에 보내주시면 됩니다.
자세히 알아보기: Excel을 사용하여 Outlook에서 대량 이메일을 보내는 방법(3가지 방법)
방법 4:HYPERLINK 기능을 사용하여 Excel에서 Outlook으로 자동 이메일 보내기
하이퍼링크 함수는 Excel 셀에서 Outlook을 가져오기 위해 클릭 가능한 링크를 생성합니다. Excel에서 자동 이메일을 보내는 매체로 사용됩니다.
1단계: 셀 H5에 다음 수식을 입력합니다. .
=HYPERLINK("MailTo:"&C5&"?Subject="&F5&"&cc="&$D$2&"&body="&G5,"Click Here") 하이퍼링크 함수는 “MailTo:”&C5&”?Subject=”&F5&”&cc=”&$D$2&”&body=”&G를 취합니다. 5를 link_location으로 , 및 '여기를 클릭하세요' friend_name으로 .
2단계: Enter 키를 누릅니다. 링크를 붙여넣습니다. 그런 다음 링크를 클릭하십시오.
3단계: Excel에서 Outlook으로 이동합니다. . 모든 Outlook이 표시됩니다. 항목은 Excel에서 할당된 데이터로 채워집니다. 보내기를 클릭합니다. .
4단계: 채우기 핸들 드래그 다른 셀에 수식을 적용합니다.
자세히 알아보기: Excel에서 조건이 충족되면 자동으로 이메일을 보내는 방법
결론
VBA 매크로 변형 및 HYPERLINK 기능은 Excel에서 Outlook으로 자동 이메일을 보내는 동안 유용할 수 있습니다. 위에서 설명한 방법 중에서 원하는 방법을 찾으시기 바랍니다. 추가 문의 사항이 있거나 추가할 사항이 있으면 댓글을 남겨주세요.
관련 기사
- VBA를 사용하여 Excel 워크시트에서 자동으로 미리 알림 이메일 보내기
- 수정 가능한 Excel 스프레드시트를 이메일로 보내는 방법(3가지 빠른 방법)
- 본문과 함께 Excel에서 이메일을 보내는 매크로(3가지 유용한 사례)
- 날짜를 기준으로 Excel에서 자동으로 이메일을 보내는 방법
- 매크로를 사용하여 본문과 함께 Excel에서 이메일을 보내는 방법(간단한 단계 포함)