Đăng ký Để nhận video mới:
Facebook hỗ trợ:
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 từng người.
Với ứng dụng này của VBA bạn có thể:
1. gửi email hàng loạt trong excel, gmail, outlook
2. gửi email cho nhiều người
3. gửi email đính kèm file
4. gửi email với các file đính kèm riêng rẽ tới nhiều người
5. gửi mail hàng loạt bằng excel VBA
6. VBA gửi email hàng loạt
….
Các bạn nhớ cho ý kiến về video, đăng ký kênh để cập nhật video mới nhất và chia sẻ để ủng hộ Gà Excel nhé.
Tag: tạo danh sách gửi mail, vba gửi email hàng loạt, gửi email hàng loạt, gửi email từ excel, gửi email từ vba, gửi mail từ file excel, gửi mail hàng loạt, gửi email hàng loạt trong excel, gửi thư từ excel, gửi mail từ excel, gửi mail hàng loạt bằng Excel VBA, VBA gửi email với các file đính kèm riêng rẽ tới nhiều người, gửi email với các file đính kèm bằng excel vba,ứng dụng vba,ứng dụng vba excel, gà excel, excel.chicken, gaexcel, vba excel, học vba, hoc vba trong excel
Xem Thêm Bài Viết Về Thủ Thuật Khác: https://chiasecongnghe.vn/thu-thuat
Nguồn: https://chiasecongnghe.vn
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 !!!
lagom = vừa đủ! Tks
Outlook web đc ko ạ
Hi Ad! Cảm ơn bạn vì video rất bổ ích. Nhưng mình run chưa được. Copy y nguyên của bạn đấy. Báo lỗi chỗ "CreateObject". Lỗi có thể ở đâu bạn nhỉ? Mong hồi âm.
Mình đăng nhập vào Outlook với email không phải đuôi @gmail.com, khi chạy macro với i giá trị tương ứng với địa chỉ Email @gmail.com thì thấy macro báo lỗi tại dòng ".To" . Add có thể cho biết là lỗi gì không ạ./