ledangvan > 14-10-19, 11:01 AM
DooHoaangPhuuc > 14-10-19, 11:25 PM
ongke0711 > 14-10-19, 11:43 PM
(14-10-19, 11:25 PM)DooHoaangPhuuc Đã viết: Cháu xin hỏi tiếp liên quan đến xuất ra Excel:
Xuất dữ liệu từ query ra file excel có sẵn Tùy theo từng lần xuất sẽ tự động tạo một Sheet mới với tên của Sheet bao gồm "Ngày +Giờ " khi thực hiện lệnh xuất .
Cháu xin cảm ơn nhiều
DooHoaangPhuuc
rsMTK.MoveFirst
Do Until rsMTK.EOF
sWrkSht = rsMTK!MSTK
oExcelWrkBk.Worksheets.Add.Name = sWrkSht
Set oExcelWrkSht = oExcelWrkBk.Sheets(sWrkSht)