ใน Excel เราสามารถเขียน VBA สั่งให้ส่ง email อัตโนมัติ ทันที

หลังจาก ทำงาน เสร็จ บน Excel

มี code และ วิธีการตามนี้

1.ในหน้าต่าง VBA ต้องเพิ่ม Outlook Objects ก่อน

Tools - > Reference -> ติ๊ก ที่ Microsoft Office

2.สร้าง procedure และ ใส่ code ตามนี้

OutlookApp เป็นตัวแปรที่ถูก ตั้งขึ้นมาให้เป็น โปรแกรม Microsoft Outlook

Mitem เป็นตัวแปรที่ถูก ตั้งเป็น item ของ email ใน outlook

Object Mailitem สามารถ กำหนด Property กำหนด email ของผู้รับ โดยใช้ To หรือ CC

และยังสามารถใช้ Method .Attachments ในการ attach file ในการส่งได้ด้วย

การระบุแบบตรงๆ สามารถ ระบุแบบนี้ก็ได้

.To = "aa@gmail.com"

.CC ="bb@gmail.com"

หรือ จะระบุ แบบใน code ด้านบน

โดยใน code ด้านบน ให้ส่ง email ไปที่ email address ที่เก็บอยู่ช่อง A1 ของ Sheet ชื่อ List