Help với code gửi mail bằng oulook 2016 (1 người xem)

Liên hệ QC

Người dùng đang xem chủ đề này

nqtrungquatest2

Thành viên mới
Tham gia
15/3/19
Bài viết
7
Được thích
0
Hi mọi người, em dùng đoạn code sau để gửi email bằng outlook, nhưng ở mục ".to=" chỉ được 1 email, em không biết thêm người nhận như thế nào.
Mọi người giúp em với ạ. Tks mọi người
Đoạn code đây ạ:
'Gui email canh bao tb bang outlook
Set OutApp = CreateObject("Outlook.Application")
Set OutMail = OutApp.CreateItem(0)

With OutMail
.To = "aaa@gmail.com"
.CC = ""
.BCC = ""
.Subject = "Email from K6"
.Body = "File dinh kem danh sach cac thiet bi den han"
.Attachments.Add filepdf
.Send
End With
Set OutMail = Nothing
Set OutApp = Nothing

With Application
.ScreenUpdating = True
.EnableEvents = True
End With
MsgBox "Da gui email thanh cong !!!"
 
Web KT

Bài viết mới nhất

Back
Top Bottom