วิธีส่งอีเมลจำนวนมากจาก Outlook โดยใช้ Excel VBA

คุณต้องส่งอีเมลจำนวนมากที่เป็นส่วนตัวถึงลูกค้า ลูกค้า เพื่อน หรือผู้ติดต่ออื่น ๆ หรือไม่? คุณต้องการทำเช่นนั้นด้วยการคลิกเพียงครั้งเดียวหรือไม่? เป็นไปได้! มีเครื่องมือมหัศจรรย์ในMicrosoft Excelที่ทำทั้งหมดเหล่านี้ เป็น Visual Basic สำหรับแอปพลิเคชันหรือที่รู้จักในชื่อ Excel VBA

อ่านต่อเพื่อทราบวิธีส่งอีเมลจำนวนมากจาก Outlook โดยใช้Excel VBA ยังมีอีก! คุณสามารถฝึกฝนได้โดยทำตามขั้นตอนง่าย ๆ ที่กล่าวถึงในบทช่วยสอนด้านล่าง มาขุดกันเถอะ!

วิธีส่งอีเมลจำนวนมากจาก Outlook โดยใช้ Excel VBA

วิธีส่งอีเมลจำนวนมากจาก Outlook โดยใช้ Excel VBA

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

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

เมื่อคุณพร้อมใช้ไฟล์ Excel และแอป Outlook แล้ว ให้ทำตามขั้นตอนเหล่านี้:

  • จัดระเบียบแผ่นงานอีเมลจำนวนมากเป็น 6 คอลัมน์
  • พิมพ์ส่วนหัวของคอลัมน์ในแถว A1: Email To (A); อีเมล CC (B); หัวเรื่องอีเมล (C); เนื้อหาอีเมล (D), ไฟล์แนบ (E), สถานะ (F)
  • เพิ่ม "ถึงที่อยู่" ทั้งหมดภายใต้หัวข้อคอลัมน์A คุณสามารถเพิ่มอีเมลได้หลายพันฉบับหากต้องการ
  • ในทำนองเดียวกัน พิมพ์ "ที่อยู่ CC" ใต้ส่วนหัวของ คอลัมน์ B
  • ได้เวลาปรับแต่งบรรทัดหัวเรื่องอีเมลในแบบของคุณแล้ว คุณสามารถเพิ่มหัวเรื่องอีเมลที่กำหนดเองสำหรับผู้ติดต่อแต่ละคนภายใต้หัวข้อ คอลัมน์ C
  • เช่นเดียวกับเนื้อหาเนื้อหาอีเมล คัดลอกและวางเนื้อหาอีเมลในแถวใต้ส่วนหัว ของคอลัมน์ D
  • คัดลอกและวางตำแหน่งไฟล์แนบด้านล่างส่วนหัว ของคอลัมน์ E
  • ในการรับตำแหน่งไฟล์แนบ ให้กดShiftแล้วเลือกไฟล์เป้าหมายบนคอมพิวเตอร์ของคุณ
  • ตอนนี้คลิกขวาและเลือกคัดลอกเป็นเส้นทางเพื่อคัดลอกที่อยู่ไฟล์ในคลิปบอร์ดของพีซี
  • ตอนนี้คุณสามารถวางที่อยู่ลงในแถวของคอลัมน์ E ได้โดยตรง
  • ปล่อย คอลัมน์ Fว่างไว้เนื่องจากรหัส VBA จะเติมสถานะโดยอัตโนมัติ

วิธีส่งอีเมลจำนวนมากจาก Outlook โดยใช้ Excel VBA

  • บันทึกแผ่นงาน Excel เป็นไฟล์ที่เปิดใช้งานมาโคร
  • ตอนนี้ กดAlt+F11เพื่อเรียกโปรแกรมแก้ไขโค้ด VBA ขึ้นมา
  • คลิกที่เครื่องมือในเมนูด้านบน จากนั้นเลือกการอ้างอิง
  • ค้นหาMicrosoft Office 16.0 Object Libraryในรายการที่ตามมา และทำเครื่องหมายในช่อง
  • คลิกตกลงเพื่อบันทึก Outlook เป็นวัตถุสำหรับ VBA

วิธีส่งอีเมลจำนวนมากจาก Outlook โดยใช้ Excel VBA

  • ตอนนี้คลิกแทรกแล้วเลือกโมดูลเพื่อเปิดตัวแก้ไขโค้ด
  • คัดลอกและ วางรหัสที่กล่าวถึงด้านล่างในโมดูล

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 = Application. 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 <> "" จากนั้น msg.attachments.Add sh.Range("E" & i).Value End ถ้า msg.send sh.Range("F" & i).Value = "Sent" Next i MsgBox "ส่งอีเมลทั้งหมดแล้ว" End Sub

  • ป้อนชื่อเวิร์กชีตปัจจุบันโดยคั่นด้วยขีดล่างในโค้ดบรรทัดที่ 3 ซึ่งมีข้อความว่า (“ Worksheet_Name “)
  • คลิกบันทึกจากเมนูเพื่อบันทึกสคริปต์
  • คุณสามารถกดF5เพื่อเรียกใช้แมโครและ Excel จะส่งอีเมลผ่าน Outlook โดยอัตโนมัติ

วิธีส่งอีเมลจำนวนมากจาก Outlook โดยใช้ Excel VBA

  • คุณยังสามารถเข้าถึงแมโครนี้ได้ในภายหลังจาก แท็บ นักพัฒนาของเมนู Ribbon ของ Excel

บทสรุป

ตอนนี้คุณได้ติดตามวิธีการส่งอีเมลจำนวนมากจาก Outlook โดยใช้บทช่วยสอน Excel VBA แล้ว คุณสามารถส่งอีเมลจำนวนมากได้อย่างง่ายดายโดยไม่ต้องเสียเวลากับการส่งอีเมลด้วยตนเอง

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

Leave a Comment

Excel 2010: การใช้สูตรอาร์เรย์

Excel 2010: การใช้สูตรอาร์เรย์

Excel มีวิธีจัดการกับอาร์เรย์ บางครั้งอาจต้องใช้สูตรหรือดำเนินการอื่นๆ ด้วยอาร์เรย์อย่างเร่งด่วน การใช้อาร์เรย์

วิธีการจัดทำดัชนีข้อความในเอกสาร Word 2010

วิธีการจัดทำดัชนีข้อความในเอกสาร Word 2010

Microsoft Word มีฟีเจอร์ที่มีประโยชน์มาก ซึ่งช่วยให้คุณค้นหาข้อความ คำสำคัญ และคำศัพท์ได้ทันที ด้วยระบบ Word Indexing การค้นหา

Excel 2010: วิธีการลด/เพิ่มตำแหน่งทศนิยม

Excel 2010: วิธีการลด/เพิ่มตำแหน่งทศนิยม

ใน Excel 2010 คุณสามารถตั้งค่าตำแหน่งทศนิยม (เพิ่ม/ลด) ตามรูปแบบสเปรดชีตที่ต้องการได้ โดยมีสองวิธีให้คุณเลือก

วิธีจัดข้อความให้อยู่กึ่งกลางในเซลล์ใน Excel 2010

วิธีจัดข้อความให้อยู่กึ่งกลางในเซลล์ใน Excel 2010

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

กู้คืนรหัสผ่านไฟล์ Outlook .PST ด้วย Nucleus Kernel PST

กู้คืนรหัสผ่านไฟล์ Outlook .PST ด้วย Nucleus Kernel PST

คุณลืมหรือทำรหัสผ่านไฟล์ Outlook PST (ไฟล์จัดเก็บข้อมูลส่วนบุคคล) หายหรือไม่? เครื่องมือ Nucleus Kernel PST Password Recovery จะช่วยคุณกู้คืนข้อมูล

วิธีเพิ่มช่องว่างก่อนย่อหน้าอย่างรวดเร็วใน Word 2010

วิธีเพิ่มช่องว่างก่อนย่อหน้าอย่างรวดเร็วใน Word 2010

บางครั้งเอกสารดูไม่เป็นระเบียบเนื่องจากการจัดรูปแบบและเว้นวรรคไม่ถูกต้อง เราพบว่าสาเหตุหลักมาจากการเว้นวรรคที่ไม่เหมาะสม

Outlook 2010: เพิ่มรูปภาพพื้นหลังในหน้าต่างเขียนจดหมาย

Outlook 2010: เพิ่มรูปภาพพื้นหลังในหน้าต่างเขียนจดหมาย

หากคุณต้องการวางภาพพื้นหลังในหน้าต่าง Mail Compose และส่งไปยังผู้รับ Outlook 2010 ก็มีเครื่องมือง่ายๆ ที่จะวางรูปภาพเป็น

การใช้ Expression Builder ใน Access 2010

การใช้ Expression Builder ใน Access 2010

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

ดูสถิติอีเมล Outlook ด้วย Outlook StatView

ดูสถิติอีเมล Outlook ด้วย Outlook StatView

หากคุณกำลังมองหาแอปที่แสดงสถิติอีเมลแบบครบถ้วน Outlook StatView คือคำตอบ แอปนี้มีขนาดเล็ก

การเปรียบเทียบระหว่าง Office 2010 และ Office Starter 2010

การเปรียบเทียบระหว่าง Office 2010 และ Office Starter 2010

Office 2010 มีกำหนดเปิดตัวในเดือนมิถุนายนของปีนี้ นอกจากนี้ Microsoft ยังจะเสนอเวอร์ชันที่รองรับโฆษณาน้ำหนักเบาที่เรียกว่า Office Starter อีกด้วย