วิธีการส่งอีเมลจากรายการ Excel (2 วิธีที่มีประสิทธิภาพ)

เมื่อคุณต้องการส่งอีเมลจำนวนมากถึงคนกลุ่มใหญ่ คุณจะต้องมีกระบวนการอัตโนมัติที่สามารถจัดการกับงานที่ซ้ำซากได้อย่างรวดเร็ว การสร้าง Excel ไฟล์ที่มีรายชื่ออีเมลเป็นวิธีที่ใช้กันทั่วไปในการส่งอีเมลจำนวนมาก ดังนั้น ในบทช่วยสอนนี้ เราจะแสดงวิธีส่งอีเมลจาก Excel รายการโดยอัตโนมัติกับคนจำนวนมาก

2 วิธีที่มีประโยชน์ในการส่งอีเมลจากรายการ Excel

เราได้รวมชุดข้อมูลที่มีชื่อของบุคคลบางคน รวมทั้งอีเมลและหมายเลขลงทะเบียนไว้ในรูปภาพด้านล่าง จาก Excel รายการเราต้องส่งอีเมลถึงแต่ละคน เพื่อให้บรรลุสิ่งนี้ เราจะใช้ Mail Merge ของ Microsoft Word ฟังก์ชัน ตามด้วย VBA รหัสเพื่อส่งอีเมลไปยังบุคคลที่ต้องการจากรายการที่มีอยู่

1. ใช้ฟังก์ชัน Mail Merge เพื่อส่งอีเมลหลายรายการจากรายการ Excel

⇒ ขั้นตอนที่ 1:เปิดไฟล์ Word ใหม่

• เปิดช่องว่าง Word  เอกสาร
• คลิกที่ การส่งจดหมาย  แท็บ
• จาก เลือกผู้รับ ตัวเลือก ให้เลือก ใช้รายการที่มีอยู่  ตัวเลือก

⇒ ขั้นตอนที่ 2:เชื่อมโยงรายการ Excel กับไฟล์ Word

• เลือก Excel ไฟล์ที่คุณได้สร้างรายการและคลิกที่ เปิด เพื่อเปิดไฟล์

• เลือกหมายเลขแผ่นงานที่คุณเขียนรายการไว้
• จากนั้น คลิก ตกลง .

⇒ ขั้นตอนที่ 3:แทรกฟิลด์

• จาก การส่งจดหมาย ให้คลิกที่ แทรกฟิลด์ผสาน ตัวเลือกเพื่อป้อนฟิลด์ที่คุณต้องการแทรก
• ขั้นแรก ใส่ ชื่อ โดยคลิกที่มันและในตำแหน่งที่ต้องการของจดหมายทั่วไป

• ตามภาพที่แสดงด้านล่าง หลังจากเพิ่ม ชื่อ จะแสดงเป็นตัวแปรของชื่อแต่ละคน

• ในทำนองเดียวกัน ให้วาง Reg ได้ทุกที่ที่คุณต้องการในข้อความ

• ดังนั้น จะปรากฏดังภาพที่แสดงด้านล่าง

⇒ ขั้นตอนที่ 4:ตรวจสอบผลการแสดงตัวอย่าง

• คลิกที่ ดูตัวอย่างผลลัพธ์ เพื่อดูตัวอย่างสุดท้ายก่อนส่งอีเมล
• ภาพหน้าจอด้านล่างแสดงให้เห็นว่าอีเมลตัวอย่างจะมีลักษณะอย่างไร

⇒ ขั้นตอนที่ 5:รวมอีเมล

• หากต้องการรวมอีเมล ให้คลิกที่ เสร็จสิ้นและรวม  ตัวเลือก
• หากต้องการเปิด ผสานเข้ากับอีเมล ให้เลือกกล่อง ส่งข้อความอีเมล ตัวเลือก

• ในกล่อง ถึง ให้เลือก อีเมล  ตัวเลือก
• พิมพ์หัวเรื่องที่คุณต้องการใน หัวเรื่อง  กล่อง.
• รูปแบบจดหมายจะเป็น HTML โดยค่าเริ่มต้น คุณจึงไม่จำเป็นต้องเปลี่ยน
• ในตัวเลือก Send Records ให้คลิกที่ All .
• สุดท้าย คลิกที่ ตกลง เพื่อส่งอีเมลไปยังผู้รับหลายคนพร้อมกัน

• ดังนั้น อีเมลทั้งหมดจะถูกส่งผ่าน Outlook . ที่เกี่ยวข้องของคุณ ตรวจสอบ Outlook . ของคุณ ส่งตัวเลือกเพื่อยืนยันว่าได้ส่งอีเมลแล้ว

• เมื่อคุณเปิดอีเมลที่ส่ง คุณจะสังเกตเห็นว่าแต่ละฟิลด์เต็มไปด้วยข้อมูลของบุคคลใดบุคคลหนึ่ง

อ่านเพิ่มเติม: วิธีการส่งอีเมลโดยอัตโนมัติเมื่อตรงตามเงื่อนไขใน Excel

การอ่านที่คล้ายกัน

• วิธีส่งสเปรดชีต Excel ที่แก้ไขได้ทางอีเมล (วิธีด่วน 3 วิธี)
• [แก้ไขแล้ว]:แชร์เวิร์กบุ๊กไม่แสดงใน Excel (ด้วยขั้นตอนง่ายๆ)
• ส่งอีเมลเตือนความจำโดยอัตโนมัติจากแผ่นงาน Excel โดยใช้ VBA
• วิธีดูว่าใครอยู่ในไฟล์ Excel ที่แชร์ (ด้วยขั้นตอนด่วน)
• วิธีเปิดใช้งานการแชร์เวิร์กบุ๊กใน Excel

2. เรียกใช้รหัส VBA เพื่อส่งอีเมลจากการเลือกช่วง

ด้วยพรของ VBA คุณสามารถสร้างโปรแกรมเพื่อส่งอีเมลจาก Excel รายการที่มีการเลือกช่วงที่ดีกว่า ทำตามขั้นตอนด้านล่างเพื่อทำงาน

⇒ ขั้นตอนที่ 1:สร้างโมดูล

• ในการเปิด มาโคร VBA , กด  Alt +  F11 .
• คลิกที่ แทรก  แท็บ
• เลือก โมดูล ตัวเลือกในการสร้าง โมดูล .

⇒ ขั้นตอนที่ 2:วางรหัส VBA

• ใน โมดูลใหม่ วาง โค้ด VBA . ต่อไปนี้ .

#If VBA7 And Win64 Then
'Ptr is used to change for operating 32 bit to 64 bit
 Private Declare PtrSafe Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" ( _
 ByVal wnd As LongPtr, ByVal lpDirect As String, _
 ByVal Parameters As String, ByVal File As String, ByVal Operation As String, _
 ByVal nCmd As Long) As LongPtr
#Else

#End If
Sub SendExcelListEMail()
'Declare the variables
 Dim xMailAdd As String
 Dim xRegCode As String
 Dim xBody As String
 Dim xURLink As String
 Dim xRngCell As Range
 Dim xIntRg As Range
 Dim xSelectTxt As String
 Dim k As Integer
 Dim p As Double
 On Error Resume Next
'Select range select adddress
 xSelectTxt = ActiveWindow.RangeSelection.Address
'Create a Input box for the range selection
 Set xIntRg = Application.InputBox("Please Input Excel data range:", "ExcelDemy", xSelectTxt, , , , , 8)
'Apply If condition to specify column numbers for the operation
 If xIntRg Is Nothing Then Exit Sub
 If xIntRg.Columns.Count <> 3 Then
'Show the result in a msg box for not meeting the condition
 MsgBox "Error with Region Selection, please confirm", , "ExcelDemy"
 Exit Sub
 End If
'Apply For loop to run operation in each row individually
 For k = 1 To xIntRg.Rows.Count
' Collect the email address and set to the variable
 xMailAdd = xIntRg.Cells(k, 2)
' Give a subject for the Email
 xRegCode = "ExcelDemy Registration No."
' Type the body of the email
 xBody = ""
' Insert Names with the variable xIntRg
 xBody = xBody & "Greetings " & xIntRg.Cells(k, 1) & "," & vbCrLf & vbCrLf
 xBody = xBody & " Here is your ExcelDemy Registration No. "
' Insert Registration No. with the variable xIntRg
 xBody = xBody & xIntRg.Cells(k, 3).Text & "." & vbCrLf & vbCrLf
 xBody = xBody & "We are really glad to have you visit in our site, keep supporting us." & vbCrLf
 xBody = xBody & "ExcelDemy Team"
' Define spaces with (hex)
 xRegCode = Application.WorksheetFunction.Substitute(xRegCode, " ", "%20")
 xBody = Application.WorksheetFunction.Substitute(xBody, " ", "%20")
' Specify to replace carriage returns with(hex)
 xBody = Application.WorksheetFunction.Substitute(xBody, vbCrLf, "%0D%0A")
' Generate the URL Link
 xURLink = "mailto:" & xMailAdd & "?subject=" & xRegCode & "&body=" & xBody
' Use the Link to start emailing
 ShellExecute 0&, vbNullString, xURLink, vbNullString, vbNullString, vbNormalFocus
' three seconds interval for sending keystrokes
 Application.Wait (Now + TimeValue("0:00:03"))
 Application.SendKeys "%s"
 Next
End Sub

⇒ ขั้นตอนที่ 3:เรียกใช้โปรแกรม

• กด F5 เพื่อเรียกใช้โปรแกรม
• เลือก ช่วงในช่องป้อนข้อมูล
• คลิก ตกลง เพื่อส่งอีเมล

• ดังนั้น ตัวอย่างของการส่งอีเมลจะปรากฏขึ้น ดังที่แสดงในภาพด้านล่าง

• สุดท้าย คุณสามารถตรวจสอบอีเมลที่ส่งเพื่อยืนยันได้

อ่านเพิ่มเติม: วิธีการส่งอีเมลหากตรงตามเงื่อนไขใน Excel (วิธีง่ายๆ 3 วิธี)

บทสรุป

ฉันหวังว่าบทความนี้จะให้คำแนะนำเกี่ยวกับวิธีการส่งอีเมลจำนวนมากจาก Excel รายการ. ขั้นตอนทั้งหมดเหล่านี้ควรเรียนรู้และนำไปใช้กับชุดข้อมูลของคุณ ดูสมุดแบบฝึกหัดและนำทักษะเหล่านี้ไปทดสอบ เรามีแรงจูงใจที่จะทำบทแนะนำแบบนี้ต่อไปเนื่องจากการสนับสนุนที่มีค่าของคุณ

โปรดติดต่อเราหากคุณมีคำถามใด ๆ นอกจากนี้ โปรดแสดงความคิดเห็นในส่วนด้านล่างนี้

พวกเรา ความเป็นเลิศ ทีมงานจะตอบคำถามของคุณเสมอ

อยู่กับเราและเรียนรู้ต่อไป

บทความที่เกี่ยวข้อง

• วิธีการส่งอีเมลอัตโนมัติจาก Excel ไปยัง Outlook (4 วิธี)
• วิธีการส่งอีเมลจาก Excel ด้วยเนื้อความโดยใช้มาโคร (ด้วยขั้นตอนง่ายๆ)
• มาโคร Excel:ส่งอีเมลไปยังที่อยู่ในเซลล์ (2 วิธีง่ายๆ)
• วิธีการส่งอีเมลโดยอัตโนมัติจาก Excel ตามวันที่
• วิธีการส่งอีเมลหลายฉบับจากสเปรดชีต Excel (2 วิธีง่ายๆ)
• มาโครเพื่อส่งอีเมลจาก Excel พร้อมเนื้อหา (3 กรณีที่เป็นประโยชน์)