เขียน VBA ส่งเมล์ ใน Excel macro แล้วปลายทางรูปภาพ Error
Posted: Tue Jun 09, 2020 4:54 pm
คือว่าปกติผมใช้ คำสั่งใน macro excel 2010 แล้ว ก็ส่งได้ทั้งข้อความและรูปภาพที่ฝังในmailปกติ แต่พอเปลี่ยนมาเป็น excel 2016 แล้วปลายทางไม่เห็นรูปที่ฝังน่ะครับ ปลายทางเห็นเป็นกรอบสี่เหลี่ยมและมีรุปกากบาทเล็กๆ ซ้ายบน(เหมือนรูปไปแต่ไม่โชว์) จึงอยากขอสอบถามอาจารย์และพี่ๆทุกท่านว่าผมควรจะปรับแก้สูตรในการส่ง mail โดยฝังรูปเข้าไปอย่างไรได้บ้างครับ
code ที่ผมเขียนประมาณนี้น่ะครับ
.HTMLBody = "เรียน.." & "<Br>" & "<Br>" & _
"<dd>xxxxxxxxxxxxxx</dd>" & "<Br>" & "<img src=D:/XXXX.png' height=900 width=1600>" & "<Br>"
.Attachments.Add "D:\Gen\Report\xxxx & Format(Date - 1, "dd") & "_" & Format(Date - 1, "mm") & "_" & Year(Date - 1) & ".xlsx", olByValue, 1
.Display
.Send
code ที่ผมเขียนประมาณนี้น่ะครับ
.HTMLBody = "เรียน.." & "<Br>" & "<Br>" & _
"<dd>xxxxxxxxxxxxxx</dd>" & "<Br>" & "<img src=D:/XXXX.png' height=900 width=1600>" & "<Br>"
.Attachments.Add "D:\Gen\Report\xxxx & Format(Date - 1, "dd") & "_" & Format(Date - 1, "mm") & "_" & Year(Date - 1) & ".xlsx", olByValue, 1
.Display
.Send