เราจัดเก็บข้อมูลประเภทต่างๆ ใน แผ่นงาน Excel เช่น ที่อยู่อีเมลของบุคคลสำคัญหรือบริษัทอื่นๆ ขณะทำงานกับ Microsoft Excel บางครั้งเราต้อง ส่งอีเมล ปกติแล้ว ส่ง อีเมล จาก Outlook หรือ Gmail ง่าย แต่เมื่อต้องการส่ง อีเมล ตามเนื้อหาเซลล์ คุณสามารถใช้ Microsoft Excel ได้อย่างมีประสิทธิภาพ วันนี้ ในบทความนี้ เราจะเรียนรู้ สอง วิธีที่รวดเร็วและเหมาะสมในการส่งอีเมลอัตโนมัติจาก Excel ตามเนื้อหาเซลล์อย่างมีประสิทธิภาพ พร้อมภาพประกอบที่เหมาะสม
2 วิธีที่เหมาะสมในการส่งอีเมลอัตโนมัติจาก Excel ตามเนื้อหาเซลล์
สมมติว่า เรามี แผ่นงาน Excel ขนาดใหญ่ที่มีข้อมูลเกี่ยวกับ พนักงานขาย หลายคนของ Armani Group ชื่อของ พนักงานขาย หมายเลข ระบุตัวตน ประเภท สินค้า และ รายได้ที่ได้รับ โดย พนักงานขาย กำหนดอยู่ในคอลัมน์ B, C, D และ E ตามลำดับ เราจะส่งอีเมลจาก Excel ตามเนื้อหาเซลล์โดยใช้คำสั่ง Mail Merge ใน MS Word และ VBA Macros นี่คือภาพรวมของ ชุดข้อมูล สำหรับงานวันนี้
1. เรียกใช้โค้ด VBA เพื่อส่งอีเมลอัตโนมัติจาก Excel ตามเนื้อหาเซลล์
ตอนนี้ฉันจะแสดงวิธี ส่งอีเมลอัตโนมัติ จาก Excel ตามเนื้อหาเซลล์โดยใช้ VBA โค้ดที่เรียบง่าย มันมีประโยชน์สำหรับบางช่วงเวลาเฉพาะ จากชุดข้อมูลของเรา เราจะส่งอีเมลอัตโนมัติจาก Excel ตามเนื้อหาเซลล์. เราจะเขียนโค้ดที่จะส่งอีเมลอัตโนมัติหากค่าเซลล์ในเซลล์ D6 มากกว่า 400 มาตามคำแนะนำด้านล่างเพื่อส่งอีเมลอัตโนมัติจาก Excel ตามเนื้อหาเซลล์!
ขั้นตอนที่ 1:
- เปิดโมดูล โดยจากแท็บ Developer ไปที่
Developer → Visual Basic
- หลังจากคลิกริบบอน Visual Basic หน้าต่างชื่อ Microsoft Visual Basic for Applications จะปรากฏทันที จากหน้าต่างนั้น เราจะแทรกโมดูลสำหรับใช้ VBA code ของเรา ไปที่
Insert → Module
ขั้นตอนที่ 2:
- ตอนนี้ โมดูล Send Mail from Excel จะปรากฏหน้าคุณ ในโมดูล Send Mail from Excel ให้เขียน VBA โค้ดด้านล่างนี้
Dim R As Range Private Sub Worksheet_Change(ByVal Target As Range) On Error Resume Next If Target.Cells.Count > 1 Then Exit Sub Set R = Intersect(Range("D6"), Target) If R Is Nothing Then Exit Sub If IsNumeric(Target.Value) And Target.Value > 400 Then Call send_mail_outlook End If End Sub Sub send_mail_outlook() Dim x As Object Dim y As Object Dim z As String Set x = CreateObject("Outlook.Application") Set y = x.CreateItem(0) z = "Hello!" & vbNewLine & vbNewLine & _ "Hope you are well" & vbNewLine & _ "Visit our Exceldemy site" On Error Resume Next With y .To = "Address" .cc = "" .BCC = "" .Subject = "send mail based on cell value" .Body = z .Display End With On Error GoTo 0 Set y = Nothing Set x = Nothing End Sub
- เรียกใช้ VBA โดยไปที่
Run → Run Sub/UserForm
- หลังจากรัน VBA Code ตั้งแต่ตอนนี้ เมื่อค่าเซลล์ในเซลล์ D6 > 400 อีเมลใน Outlook จะถูกสร้างขึ้นอัตโนมัติพร้อมผู้รับเฉพาะ เราต้องแค่คลิกปุ่ม Send เพื่อส่งอีเมลซึ่งแสดงในภาพด้านล่าง
อ่านเพิ่มเติม: วิธีส่งอีเมลอัตโนมัติเมื่อเงื่อนไขเป็นจริงใน Excel
บทความที่คล้ายกัน
- ส่งอีเมลเตือนอัตโนมัติจากแผ่นงาน Excel โดยใช้ VBA
- [แก้ไขแล้ว]: Share Workbook ไม่แสดงใน Excel (พร้อมขั้นตอนง่าย)
- วิธีดูว่าใครอยู่ในไฟล์ Excel แบบร่วมใช้ (พร้อมขั้นตอนเร็ว)
- ส่งอีเมลจำนวนมากจาก Outlook โดยใช้ Excel (3 วิธี)
- วิธีใช้แมโครส่งอีเมลจาก Excel พร้อมไฟล์แนบ
2. ใช้คำสั่ง Mail Merge ใน Word เพื่อส่งอีเมลอัตโนมัติจาก Excel ตามเนื้อหาเซลล์
ในวิธีแรก เราจะใช้ MS Word และ คุณสมบัติ Mail Merge ใน Word เพื่อ ส่งอีเมลหลายฉบับ จาก สเปรดชีต Excel มาตามคำแนะนำด้านล่างเพื่อส่งอีเมล!
ขั้นตอนที่ 1:
- เปิดไฟล์ Word และเขียนข้อความที่ต้องการ
- จากแท็บ Mailing ไปที่
Mailings ➤ Select Recipients ➤ Use an Existing List
- กล่องโต้ตอบ Select Data Source จะปรากฏ เลือกไฟล์ Excel ที่จัดเก็บ อีเมล แล้วกด Open
- กล่องโต้ตอบ Select Table จะปรากฏ เลือกชีตที่ต้องการและกด OK
ขั้นตอนที่ 2:
- เลือกคำที่ต้องการแทนที่สำหรับแต่ละเมล ในตัวอย่างนี้เลือก Carl จากแท็บ Mailings ไปที่
Mailings → Write & Insert Field → Insert Merge Field → Sales_Rep
- มันจะคืนข้อความตามภาพด้านล่าง
- ถ้าต้องการดูตัวอย่างเมลจากมุมมองผู้รับ คลิก Preview Results
- จากแท็บ Mailing ไปที่
Mailing → Finish → Finish & Merge → Send Email Messages
- กล่องโต้ตอบ Merge to E-mail จะปรากฏ เลือกหัวข้อ Sales_Rep ในฟิลด์ To และพิมพ์ Subject line (Greetings) ตามต้องการ กด OK และมันจะส่งเมลไปยังผู้รับทั้งหมด
อ่านเพิ่มเติม: วิธีส่งไฟล์ Excel ไปอีเมลอัตโนมัติ (3 วิธีที่เหมาะสม)
สิ่งที่ควรจดจำ
👉 คุณสามารถเปิดหน้าต่าง Microsoft Visual Basic for Applications ได้โดยกด Alt + F11 พร้อมกัน
👉 หากแท็บ Developer ไม่นำ้ในริบบอน คุณสามารถทำให้มองเห็นได้ ไปที่
File → Option → Customize Ribbon
สรุป
หวังว่าวิธีที่เหมาะสมทั้งหมดที่กล่าวมาข้างต้นสำหรับ การส่งอีเมลอัตโนมัติจาก Excel ตามเนื้อหาเซลล์ ด้วย VBA โค้ด จะกระตุ้นให้คุณนำไปใช้ใน สเปรดชีต Excel ของคุณด้วยประสิทธิภาพมากขึ้น คุณยินดีต้อนรับที่จะแสดงความคิดเห็นอย่างอิสระหากมีคำถามหรือข้อสงสัย
บทความที่เกี่ยวข้อง
- วิธีส่งอีเมลหากเงื่อนไขเป็นจริงใน Excel (3 วิธีง่าย)
- วิธีส่งอีเมลจาก Excel พร้อมเนื้อหาโดยใช้แมโคร (พร้อมขั้นตอนง่าย)
- Excel Macro: ส่งอีเมลไปยังที่อยู่ในเซลล์ (2 วิธีง่าย)
- วิธีส่งอีเมลอัตโนมัติจาก Excel ตามวันที่
- แมโครส่งอีเมลจาก Excel พร้อมเนื้อหา (3 กรณีที่มีประโยชน์)
- วิธีส่งอีเมลจากรายการ Excel (2 วิธีที่มีประสิทธิภาพ)
