Excel Macro เพื่อส่งอีเมลโดยอัตโนมัติ (3 ตัวอย่างที่เหมาะสม)

  • แบ่งปันสิ่งนี้
Hugh West

บทช่วยสอนนี้จะแสดงวิธีการใช้มาโคร excel เพื่อส่งอีเมลโดยอัตโนมัติ เราสามารถกำหนดค่าคุณลักษณะการส่งจดหมายของเราโดยใช้มาโคร VBA ดังนั้น การใช้มาโคร VBA ทำให้เราสามารถส่งอีเมลไปยังผู้ใช้หลายคนพร้อมกันได้ เราต้องติดตั้ง Outlook บนอุปกรณ์ของเราเพื่อส่งอีเมลโดยอัตโนมัติด้วยมาโคร เนื่องจากโค้ดที่เราจะแทรกจะใช้ Outlook ในการส่งอีเมลไปยังผู้รับ

ดาวน์โหลด Practice Workbook

คุณสามารถดาวน์โหลด Practice Workbook ได้จากที่นี่

ส่งอีเมลโดยอัตโนมัติ.xlsm

3 ตัวอย่างที่เหมาะสมของมาโคร Excel เพื่อส่งอีเมลโดยอัตโนมัติ

ตลอดบทความนี้ เราจะสาธิต 3 ตัวอย่างที่เหมาะสมของการใช้มาโคร excel เพื่อส่งอีเมลถึงผู้รับโดยอัตโนมัติ ก่อนที่จะเริ่มแสดงตัวอย่าง เราจำเป็นต้องแก้ไขบางอย่างในแผ่นงาน excel ของเรา ทำตามขั้นตอนด้านล่างก่อนที่จะใช้มาโครเพื่อส่งอีเมลโดยอัตโนมัติ

ขั้นตอน:

  • ขั้นแรก จากชุดข้อมูลของคุณ ให้ไปที่ แท็บนักพัฒนาซอฟต์แวร์ . เลือกตัวเลือก Visual Basic .

  • ถัดไป ไปที่แท็บ เครื่องมือ และเลือกตัวเลือก ข้อมูลอ้างอิง .

  • กล่องโต้ตอบใหม่ที่ชื่อว่า ' ข้อมูลอ้างอิง – VBAProject ' จะเปิดขึ้น
  • สุดท้าย ตรวจสอบตัวเลือก ' Microsoft Office 16.0 Object Library ' และคลิกที่ ตกลง

1. ใช้แมโคร Excel VBA เพื่อส่งอีเมลโดยอัตโนมัติตามค่าเซลล์

ก่อนอื่น เราจะใช้มาโคร excel VBA เพื่อส่งอีเมลโดยอัตโนมัติตามค่าเซลล์เฉพาะในชุดข้อมูลของเรา เพื่อแสดงตัวอย่างนี้ เราจะใช้ชุดข้อมูลต่อไปนี้ เราจะเขียนโค้ดที่จะส่งอีเมลโดยอัตโนมัติหากค่าเซลล์ในเซลล์ D6 มากกว่า 400 .

มาดูขั้นตอนในการดำเนินการนี้กัน

STEPS:

  • เริ่มต้นด้วย ขวา คลิก บนแผ่นงาน ' อิงตามเซลล์ '.
  • นอกจากนี้ เลือกตัวเลือก ' ดูรหัส '.

<18

  • การดำเนินการข้างต้นจะเปิดหน้าต่างรหัส VBA ว่างสำหรับแผ่นงานนั้น อีกวิธีในการเปิดหน้าต่างรหัสคือการกด Alt + F11 .
  • นอกจากนี้ พิมพ์รหัสต่อไปนี้ในหน้าต่างรหัสนั้น:
2177
  • จากนั้น คลิกปุ่ม เรียกใช้ หรือกดปุ่ม F5 เพื่อเรียกใช้โค้ด

  • กล่องโต้ตอบใหม่ชื่อ มาโคร จะปรากฏขึ้น
  • หลังจากนั้น ในฟิลด์ ชื่อมาโคร ให้เลือกมาโคร ' send_mail_outlook '.
  • ตอนนี้ให้คลิกที่ปุ่ม เรียกใช้

  • สุดท้าย จากนี้เมื่อเซลล์ ค่าในเซลล์ D6 > 400 อีเมลใน Outlook จะสร้างโดยอัตโนมัติกับผู้รับที่ระบุ เราต้องคลิกที่ปุ่ม ส่ง เพื่อส่งอีเมล

อ่านเพิ่มเติม: ส่งอีเมลโดยอัตโนมัติจาก Excel ตามเนื้อหาของเซลล์ (2 วิธี)

2. ส่งอีเมลโดยอัตโนมัติตามวันที่ครบกำหนดด้วย VBA Macro

ใน วิธีที่สอง เราจะใช้แมโคร Excel VBA เพื่อส่งอีเมลโดยอัตโนมัติหากวันครบกำหนดของโครงการใด ๆ ใกล้เข้ามา นี่เป็นสิ่งที่ต้องการเตือนความจำ เราใช้ชุดข้อมูลต่อไปนี้เพื่อแสดงตัวอย่างนี้ ชุดข้อมูลประกอบด้วยอีเมลของพนักงานขาย ข้อความ และวันที่ครบกำหนดของโครงการ

ทำตามขั้นตอนด้านล่างเพื่อดำเนินการตามวิธีนี้

ขั้นตอน:

  • ขั้นแรก คลิกขวาที่แผ่นงาน วันที่
  • ถัดไป เลือกตัวเลือก ' ดูโค้ด '.

  • จะเปิดหน้าต่างโค้ด VBA ว่างสำหรับแผ่นงานที่ใช้งานอยู่ เรายังสามารถกด Alt + F11 เพื่อรับหน้าต่างโค้ดนั้น
  • จากนั้นใส่โค้ดต่อไปนี้ในหน้าต่างโค้ดนั้น:
3851

" aMailBody = "" aMailBody = aMailBody & "สวัสดี" & zRgSendVal & CrLf aMailBody = aMailBody & "ข้อความ: " & aRgText.Offset(j - 1).Value & CrLf aMailBody = aMailBody & "" ตั้งค่า aMailItem = aOutApp.CreateItem(0) ด้วย aMailItem .Subject = aMailSubject .To = zRgSendVal .HTMLBody = aMailBody .Display End With Set aMailItem = Nothing End If End If Next Set aOutApp = Nothing End Sub

  • ตอนนี้ ใช้ปุ่ม เรียกใช้ หรือปุ่ม F5 เพื่อเรียกใช้โค้ด

  • ใหม่กล่องโต้ตอบจะปรากฏขึ้น
  • หลังจากนั้น ในช่องป้อนข้อมูลของกล่องโต้ตอบนั้น ให้เลือกช่วงของคอลัมน์วันที่ครบกำหนด D$5:$D$9 จากนั้นคลิกที่ ตกลง .

  • กล่องโต้ตอบอีกหนึ่งกล่องจะปรากฏขึ้น
  • นอกจากนี้ ใน ช่องป้อนข้อมูล เลือกช่วงคอลัมน์ B$5:$B$9 ที่มีที่อยู่อีเมล และคลิก ตกลง .

  • ยิ่งไปกว่านั้น หน้าต่างอีกบานหนึ่งจะปรากฏขึ้น เลือกช่วงข้อความ $C$5:$C$9 ในช่องป้อนข้อมูลของหน้าต่างป๊อปอัป

  • ในตอนท้าย เราสามารถเห็นผลลัพธ์ดังภาพต่อไปนี้ เราได้รับ 3 อีเมลที่สร้างขึ้นโดยอัตโนมัติใน 3 หน้าต่างต่างๆ ของ Outlook การดำเนินการนี้จะไม่สร้างอีเมลสำหรับที่อยู่อีเมลสองรายการแรก เนื่องจากวันครบกำหนดของทั้งสองโครงการสิ้นสุดลงแล้ว

อ่านเพิ่มเติม: วิธีส่งอีเมลโดยอัตโนมัติจาก Excel ตาม วันที่

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

  • [แก้ไข]: แชร์สมุดงานที่ไม่แสดงใน Excel (พร้อมขั้นตอนง่ายๆ)
  • วิธีส่งอีเมลจากรายการ Excel (2 วิธีที่มีประสิทธิภาพ)
  • วิธีส่งสเปรดชีต Excel ที่แก้ไขได้ทางอีเมล (3 วิธีด่วน)
  • มาโครเพื่อส่งอีเมลจาก Excel (5 ตัวอย่างที่เหมาะสม)
  • มาโครเพื่อส่งอีเมลจาก Excel พร้อมเนื้อหา (3 กรณีที่เป็นประโยชน์)

3. ใช้ Excel Macro เพื่อส่งอีเมลโดยอัตโนมัติพร้อมไฟล์แนบ

ในตัวอย่างสุดท้าย เราจะมาดูกันว่าเราสามารถพัฒนาแมโคร excel เพื่อส่งอีเมลโดยอัตโนมัติพร้อมไฟล์แนบ สมมติว่าเรามีสิ่งที่แนบมาในรูปต่อไปนี้ เราต้องการส่งไฟล์แนบนี้ทางอีเมลโดยใช้ excel VBA มาโคร ในการทำเช่นนี้เราต้องการเส้นทางของไฟล์ excel นี้ นี่คือขั้นตอน:

  • เลือกไฟล์ ' Attachment.xlsx ' '.
  • คลิกที่ตัวเลือก ' คัดลอกเส้นทาง '.

  • ดังนั้น เส้นทางของไฟล์ที่เราได้รับ:
E:\Exceldemy\Attachment.xlsx

เราจะแทรกพาธนี้ในโค้ดแมโครเพื่อส่งไฟล์นี้ทางอีเมล ทำตามขั้นตอนด้านล่างเพื่อดำเนินการนี้

ขั้นตอน:

  • ประการแรก ไปที่แท็บ นักพัฒนาซอฟต์แวร์ และเลือกตัวเลือก Visual Basic .

  • หน้าต่างใหม่ชื่อ ' Project – VBAProject จะเปิดขึ้น '
  • ประการที่สอง คลิกขวา ที่ชื่อแผ่นงาน
  • จากนั้น เลือก แทรก > โมดูล

  • คำสั่งดังกล่าวจะเปิดช่องว่าง VBA
  • ประการที่สาม พิมพ์โค้ดต่อไปนี้ในโมดูลนั้น:
5924
  • จากนั้น กดปุ่ม F5 หรือคลิกปุ่ม เรียกใช้ เพื่อเรียกใช้โค้ด

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

อ่านเพิ่มเติม: วิธีสมัครมาโครเพื่อส่งอีเมลจาก Excel พร้อมไฟล์แนบ

สรุป

โดยสรุป บทความนี้แสดง 3 ตัวอย่างการใช้ excel VBA มาโครเพื่อ ส่งเมลโดยอัตโนมัติ ดาวน์โหลดแผ่นงานตัวอย่างที่ระบุในบทความนี้เพื่อทดสอบทักษะของคุณ หากคุณมีคำถามใด ๆ โปรดแสดงความคิดเห็นในช่องด้านล่าง ทีมงานของเราจะพยายามตอบกลับข้อความของคุณโดยเร็วที่สุด จับตาดูโซลูชัน Microsoft Excel ที่สร้างสรรค์ยิ่งขึ้นในอนาคต

Hugh West เป็นผู้ฝึกอบรมและนักวิเคราะห์ Excel ที่มีประสบการณ์สูงและมีประสบการณ์มากกว่า 10 ปีในอุตสาหกรรมนี้ เขาสำเร็จการศึกษาระดับปริญญาตรีสาขาการบัญชีและการเงิน และปริญญาโทสาขาบริหารธุรกิจ Hugh มีความหลงใหลในการสอนและได้พัฒนาแนวทางการสอนที่เป็นเอกลักษณ์ซึ่งง่ายต่อการติดตามและเข้าใจ ความรู้ความเชี่ยวชาญของเขาเกี่ยวกับ Excel ช่วยให้นักเรียนและผู้เชี่ยวชาญหลายพันคนทั่วโลกพัฒนาทักษะและความเป็นเลิศในอาชีพการงาน ฮิวจ์แบ่งปันความรู้ของเขากับคนทั้งโลกผ่านบล็อก โดยเสนอบทช่วยสอน Excel ฟรีและการฝึกอบรมออนไลน์เพื่อช่วยให้บุคคลและธุรกิจบรรลุศักยภาพสูงสุดของตนเอง