Gửi email từ excel bằng VBA

Liên hệ QC
- Khi làm, mình chạy thử bằng gmail của mình... nên nếu bạn bị lỗi thì xem hệ thống mail của bên bạn xem...
- Chèn logo, chữ ký: để mình xem lại
- Nội dung trong form thì vẫn được chứ? (sử dụng font unicode...)
Hi Anh, Em đã tự tìm cách sữa dc hết các lỗi trên rồi, Thanks anh
 
Bạn tải 2 file dưới rồi về mở cả 2 file đó nhé.
(File .xlam là phần vba, file .xlsx là file dữ liệu của bạn)
Rồi click nút như hình:

View attachment 172016

nhập STT ở cột A sheet "Data Luong" vào 2 textbox đó...
Chào anh,
Anh có thể cho em xin đoạn code của addins này được không? Em đang cần dùng tính năng này nhưng phải sửa lại chút xíu nên xin anh đoạn code để tùy biến.
Em cám ơn anh.
 
chào bạn
Mình đang đọc cách để gửi nhiều mail cho nhiều người, mỗi người đính kèm một tệp khác nhau. mình xem ở trên và tải file sendmail.xlam nhưng không mở được . Bạn hỗ trợ mình với. Mình gửi kèm danh sách email và file dữ liệu. Phần tách các sheet ra các file mình làm được rồi nhưng phần gửi đi các email thì chưa đcj
 

File đính kèm

  • dia chi mail bc dong hung.xls
    22.5 KB · Đọc: 17
  • ph15.xlsx
    45.2 KB · Đọc: 14
Chào các anh chị,

Em có làm thử như file anh befaint làm nhưng máy em chạy MacOs nên báo lỗi dòng Outlook.Application thì em phải sửa lại thì như thế nào ạh.

Nhân tiện cho em hỏi thêm file lương em đính kèm, nếu muốn thêm password vào mỗi file excel (pass là ID và 6 số cuối chứng minh nhân dân) thì phải làm sao nhờ anh chị chỉ giúp (em đã xem các bài có chỉ nhưng em làm không được ạh)

Cám ơn các anh ở GPE
 

File đính kèm

  • SendMail.xlsx
    16.4 KB · Đọc: 46
  • Screen Shot 2018-08-17 at 9.02.27 PM.png
    Screen Shot 2018-08-17 at 9.02.27 PM.png
    404.5 KB · Đọc: 72
Cho minh hoi, bây giờ mình muốn gửi thư mời theo danh sách email. Thứ tự thư mời là tên file word xếp theo thứ tự email để trên 1 folder. Có cách nào để gửi thư mời cùng lúc cho nhiều người. Mỗi người 1 thư trên 1 file word. Xin cảm ơn
 
Cho minh hoi, bây giờ mình muốn gửi thư mời theo danh sách email. Thứ tự thư mời là tên file word xếp theo thứ tự email để trên 1 folder. Có cách nào để gửi thư mời cùng lúc cho nhiều người. Mỗi người 1 thư trên 1 file word. Xin cảm ơn
Có nghĩa là bây giờ bạn có danh sách gửi thư và file word đính kèm cần gửi thư cho từng người đúng không.Nhưng vấn đề ở đây là tên của file word gửi đi có cùng tên với mail cần gửi không.Mà bạn cho cái file với vài file word ví dụ coi.
 
Em có file tính lương như file đính kèm. Em nhờ các thầy và các anh, chị giúp cho em để gửi lương cho từng người theo form có sẵn với ạ. Về nội dung email em có xem theo gợi í của bác befaint thì nều được em xin các Thầy và anh, chị giúp em theo p/a 2 (Copy luôn cái form vào nội dung mail rồi gửi cho từng nhân sự ), nếu ko thì Thầy và các anh , chị giúp cách nào cũng được. Em xin cảm ơn ạ !
 

File đính kèm

  • Bảng lương.xlsx
    78.3 KB · Đọc: 15
Bạn tải 2 file dưới rồi về mở cả 2 file đó nhé.
(File .xlam là phần vba, file .xlsx là file dữ liệu của bạn)
Rồi click nút như hình:

View attachment 172016

nhập STT ở cột A sheet "Data Luong" vào 2 textbox đó...

Em ko chạy được addin, anh hướng dẫn giúp em cách chạy file SendEmail.xlam với ạ. Em đã cài addin rồi mà khi mở nó vẫn ko ra cái gì cả. Em cảm ơn anh !
 
Em có file tính lương như file đính kèm. Em nhờ các thầy và các anh, chị giúp cho em để gửi lương cho từng người theo form có sẵn với ạ. Về nội dung email em có xem theo gợi í của bác befaint thì nều được em xin các Thầy và anh, chị giúp em theo p/a 2 (Copy luôn cái form vào nội dung mail rồi gửi cho từng nhân sự ), nếu ko thì Thầy và các anh , chị giúp cách nào cũng được. Em xin cảm ơn ạ !
Bạn dùng thử cách mình đang dùng nhé.
Mình sưu tập code trên mạng và chắp nối kiểu Macro Recorder nên cũng ngô nghê lắm. Dùng tạm nhé. Dùng được hay không thì báo lại nhé

[Xin phép được rút lại file đính kèm do người hỏi đã được đáp ứng và do trong file có tài khoản email cá nhân]
 
Lần chỉnh sửa cuối:
Bạn dùng thử cách mình đang dùng nhé.
Thế nếu là công ty may, có rất nhiều các cô các bác lớn tuổi *** không biết tải và cài đặt thì lấy gì để đọc PDF? Sao không làm thêm, chèn thêm bảng vào nội dung thư?

***

:D
 
Thế nếu là công ty may, có rất nhiều các cô các bác lớn tuổi *** không biết tải và cài đặt thì lấy gì để đọc PDF? Sao không làm thêm, chèn thêm bảng vào nội dung thư?

***

:D
Bác ơi, bác xem lại giúp em chứ vấn đề của em khác cái đó mà bác. Em là muốn gửi từng Phiếu lương riêng rẽ cho từng người lao động theo số liệu tính công của mỗi người mà bác. Cảm ơn bác đã note cho em !
 
Bác ơi, bác xem lại giúp em chứ vấn đề của em khác cái đó mà bác. Em là muốn gửi từng Phiếu lương riêng rẽ cho từng người lao động theo số liệu tính công của mỗi người mà bác. Cảm ơn bác đã note cho em !
Tôi chú thích là trong chủ đề kia có đoạn "công ty may, có rất nhiều các cô các bác lớn tuổi". Thế thôi. :D
 
Bạn dùng thử cách mình đang dùng nhé.
Mình sưu tập code trên mạng và chắp nối kiểu Macro Recorder nên cũng ngô nghê lắm. Dùng tạm nhé. Dùng được hay không thì báo lại nhé
Cảm ơn Minh Khai đã giúp đỡ, nhưng em chạy thì bị lỗi như sau ạ
BL.png

Nhờ bác Minh Khai xem giúp em. Em xin cảm ơn !
 
Bạn tải 2 file dưới rồi về mở cả 2 file đó nhé.
(File .xlam là phần vba, file .xlsx là file dữ liệu của bạn)
Rồi click nút như hình:

View attachment 172016

nhập STT ở cột A sheet "Data Luong" vào 2 textbox đó...
anh ơi, cách này đúng là phương án mà em cần, tuy nhiên anh có thể cho em xin code để tùy chỉnh theo file của em được không?
--------
P/S: đã thấy code, cảm ơn anh !
 
Bạn tải 2 file dưới rồi về mở cả 2 file đó nhé.
(File .xlam là phần vba, file .xlsx là file dữ liệu của bạn)
Rồi click nút như hình:

View attachment 172016

nhập STT ở cột A sheet "Data Luong" vào 2 textbox đó...
anh ơi, em có tìm hiểu code nhưng không biết cách làm, em gửi lại file dữ liệu anh làm giúp em với ạ, cảm ơn anh
 

File đính kèm

  • PHIẾU LƯƠNG T12.2019.xlsm
    359.4 KB · Đọc: 3
@befaint : anh ơi, sau 1 hồi mày mò, thì em làm được phần dữ liệu rồi. Tuy nhiên khi nhận được mail thì phần định dạng bảng biểu bị mất, anh giúp em với ạ
 

File đính kèm

  • mong muon.png
    mong muon.png
    40.8 KB · Đọc: 34
  • thuc te.png
    thuc te.png
    90.7 KB · Đọc: 25
  • PHIẾU LƯƠNG T12.2019.xlsm
    27.8 KB · Đọc: 18
  • SendEmail.xlam
    30.1 KB · Đọc: 25
@befaint : anh ơi, sau 1 hồi mày mò, thì em làm được phần dữ liệu rồi. Tuy nhiên khi nhận được mail thì phần định dạng bảng biểu bị mất, anh giúp em với ạ
Cũng hơi lạ nhưng bạn thử như sau: mở Excel đã có add-in -> Alt + F11 -> nếu VBAProject (SendEmail.xlam) chưa mở thì click dấu + để mở -> phải chuột trên Form_SendMail -> chọn View Code -> tìm đến Sub SendMail -> sau dòng Sub SendMail(chk As Boolean) thì thêm dòng
Mã:
Const olFormatHTML = 2

-> tìm đến dòng With OutMail -> sau dòng With OutMail thì thêm
Mã:
.BodyFormat = olFormatHTML

-> chú ý có dấu chấm đằng trước -> chọn menu File -> chọn Save SendEmail.xlam -> thử gửi thư.
 
Lần chỉnh sửa cuối:
Cũng hơi lạ nhưng bạn thử như sau: mở Excel đã có add-in -> Alt + F11 -> nếu VBAProject (SendEmail.xlam) chưa mở thì click dấu + để mở -> phải chuột trên Form_SendMail -> chọn View Code -> tìm đến Sub SendMail -> sau dòng Sub SendMail(chk As Boolean) thì thêm dòng
Mã:
Const olFormatHTML = 2

-> tìm đến dòng With OutMail -> sau dòng With OutMail thì thêm
Mã:
.BodyFormat = olFormatHTML

-> chú ý có dấu chấm đằng trước -> chọn menu File -> chọn Save SendEmail.xlam -> thử gửi thư.
anh ơi, em thử rồi mà kết quả vẫn vậy à, không có thay đổi gì hết trơn á, anh xem giùm em với
 

File đính kèm

  • SendEmail.xlam
    30.6 KB · Đọc: 16
  • PHIẾU LƯƠNG T12.2019.xlsm
    27.9 KB · Đọc: 8
Web KT
Back
Top