Bài học Ứng dụng VBA Excel này mình sẽ hướng dẫn các bạn cách gửi email hàng loạt bằng excel vba tới nhiều người bao gồm các file đính kèm riêng rẽ cho …
Tag: gửi mail hàng loạt bằng outlook có file đính kèm, [vid_tags]
Xem thêm: https://blogthủthuật.vn/category/chia-se
Nguồn: https://blogthủthuật.vn
Mình viết như hướng dẫn nhưng khi gửi hệ thống báo là không gửi đc, lỗi như phía dưới thì sửa thế nào ad nhỉ?
This message could not be sent. The client operation failed. Try sending the message again later, or contact your network administrator.
Cho mình hỏi mình muốn tạo thêm 1 cột email nữa thì làm như nào ạ , mình cảm ơn
Baolac2@gmail.com
Nếu outlook cài đặt tích hợp 2 email thì có thêm lệnh gì để chọn email gửi đi không bạn?
Cho mình hỏi , mình làm các bước đều được trừ bước "file dinh kem " thì ko viết được gạch chéo . nó toàn ra kí tự đồng yên nhật chạy nó kêu lỗi
Cám ơn anh vì video hữu ích. Anh cho em hỏi, nếu mình muốn gửi từng mail cùng lúc cho nhiều người thì mình thay đổi như thế nào ạ?
clip rất hay. Cám ơn Gà Excel. Nhung làm sao thêm được chữ ký đã tạo sẳn trong outlook nữa?? Thank
Cảm ơn Gà EXCELL, trường hợp mình muốn xem preview trước khi đặt tên thì mình dùng Preview = True duoc không?
Anh ơi cho em hỏi nếu nội dung email mình muốn xuống dòng thì làm như thế nào ạ?
Sub GuiMailHangLoat()
'Goi Ung Dung Outlook
Dim olApp As Outlook.Application
Set olApp = CreateObject("Outlook.Application")
Dim i, So_nguoi_nhan_mail As Integer
So_nguoi_nhan_mail = Excel.WorksheetFunction.CountA(ThisWorkbook.Sheets(1).Range("B:B"))
For i = 2 To So_nguoi_nhan_mail
' Goi Ung Dung Mail
Dim olMail As Outlook.MailItem
Set olMail = olApp.CreateItem(olMailItem)
'Gui Mail
olMail.To = ThisWorkbook.Sheets(1).Cells(i, 2)
olMail.Subject = "Dear " & ThisWorkbook.Sheets(1).Cells(i, 3)
olMail.Body = "Ket Qua Thi THPT Cua Ban La: " & ThisWorkbook.Sheets(1).Cells(i, 4)
olMail.Send
=> báo lỗi chỗ này ạ!!!!
Next
End Sub
anh chỉ em chỗ a dẫn đc file 1.xlsx ( ở ô attach file ) đc ôn anh và tên file làm giống anh đc ôn anh
a chỉ kỹ cái khúc có file đính kèm đc ôn anh, thứ 1 là a chỉ cách đưa tên file vào ô excell như anh, rồi chỉ cách code sau đc ôn anh. em chưa hiểu tên file a nói là tên folder mình để ổ D hay sao anh
Hay quá bạn ơi
cảm ơn bạn, nếu chỉ gửi mail theo vùng chọn bất kỳ trong sheet thì phải sao ạ, mong hướng dẫn
a gà ơi, làm sao đính kèm cái tên file đó y chan giống trong folder ạ? e làm copy past name lại lâu quá
Bạn ơi, cho mình hỏi nếu dòng email của mình là group mail thì sao ah?
nếu muốn gửi từ gmail thì chỉnh sửa lại như thế nào
Mình đã Reference enable Microsoft Outlook 16 rồi, mà vào coding ko thấy Outlook:
Sub guiEmail()
Dim olApp As Outlook…
End Sub
Cách gửi một đoạn bảng tính qua Email ngay trên Excel thế nào vậy gà
Gà cho mình hỏi nếu mỗi mail mình muốn đính kèm 3 file thì code vba sẽ như nào gà
Khi gửi outlook bắt phải xác nhận từng mail bạn ơi, mình sửa thế nào
Cho mình hỏi tí có định ngày gửi email được không
mình muốn setup gởi email trên chính cái file đang làm và gởi cái file đang làm luôn thì làm sao bạn? Hướng dẫn mình với, Mình cảm ơn nhiều
Bài hướng dẫn tuyệt với. Xin cho hỏi:
1. File đính kèm có thể nhận diện file pdf k add?
2. Nội dung chỗ body message nếu muốn xuống hàng thì gán thêm hàm gì
Cám ơn add.
Code này sao không thấy dòng nhập địa chỉ mail và pass của mail gửi đi vậy !!!