วิธีส่งอีเมลจำนวนมากจาก 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

Microsoft Word 2010: ดูเอกสารสองฉบับแบบเคียงข้างกัน

Microsoft Word 2010: ดูเอกสารสองฉบับแบบเคียงข้างกัน

ในหลายกรณี เราต้องเปรียบเทียบเอกสาร Word สองฉบับ การมีเอกสารทั้งสองฉบับอยู่เคียงข้างกันเป็นสิ่งสำคัญสำหรับการเปรียบเทียบ คุณสามารถเปิดเอกสารทั้งสองฉบับแยกกันได้

การกำหนดเกณฑ์การค้นหาใน Access 2010 ผ่านตัวดำเนินการเชิงตรรกะ

การกำหนดเกณฑ์การค้นหาใน Access 2010 ผ่านตัวดำเนินการเชิงตรรกะ

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

ดูสถิติทั้งหมดของสมุดงาน Excel 2010

ดูสถิติทั้งหมดของสมุดงาน Excel 2010

Excel 2010 มีฟีเจอร์ที่แสดงสถิติทุกประเภทเกี่ยวกับเวิร์กบุ๊ก โดยส่วนใหญ่ประกอบด้วย ผู้เขียน ข้อมูลที่เข้าถึงและแก้ไขล่าสุด ชื่อ

Excel 2010: การใช้แมโครผ่านปุ่ม

Excel 2010: การใช้แมโครผ่านปุ่ม

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

Excel 2010: ฟังก์ชัน SUMSQ

Excel 2010: ฟังก์ชัน SUMSQ

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

กรอกอัตโนมัติใน Excel 2010 และ Word 2010 (ฟังก์ชัน RAND)

กรอกอัตโนมัติใน Excel 2010 และ Word 2010 (ฟังก์ชัน RAND)

แอปพลิเคชันชุด Microsoft Office ช่วยให้สามารถกรอกข้อมูลในเอกสารและสเปรดชีตโดยอัตโนมัติ ในบทความนี้ เราจะแนะนำวิธีการ

ฟังก์ชัน DATE ของ MS Access 2010

ฟังก์ชัน DATE ของ MS Access 2010

การเข้าถึงประกอบด้วยเครื่องมืออันทรงพลังมากมาย ช่วยให้ผู้ใช้กำหนดวันที่และช่วงวันที่ได้ตามเกณฑ์ที่กำหนด เพื่อให้ใช้งานได้อย่างสะดวก

ส่งเมล Outlook ไปยัง OneNote 2010

ส่งเมล Outlook ไปยัง OneNote 2010

Outlook 2010 มีคุณลักษณะในตัวที่ให้ผู้ใช้ถ่ายโอนอีเมลไปยัง OneNote 2010 ซึ่งอาจมีประโยชน์มากหากคุณใช้ OneNote 2010 สำหรับการบันทึก

ฝังแผ่นข้อมูลจาก Excel 2010 ลงในเอกสาร Word

ฝังแผ่นข้อมูลจาก Excel 2010 ลงในเอกสาร Word

Excel 2010 มีฟีเจอร์ที่ช่วยให้ผู้ใช้ฝังและเชื่อมโยงวัตถุต่างๆ ได้ OLE (Object Linking and Embedding) เป็นเทคนิคในการแทรกข้อมูลจาก

บันทึกเสียงและวิดีโอใน Office OneNote 2010

บันทึกเสียงและวิดีโอใน Office OneNote 2010

Microsoft OneNote 2010 ช่วยให้ผู้ใช้บันทึกไฟล์เสียงหรือวิดีโอ ซึ่งมีประโยชน์มากในการจับเนื้อหาเสียง/วิดีโอที่ช่วยเสริมหรือเสริม