Giúp đỡ về vòng lặp để Append dòng vào Table Access

ongke0711

New Member
Hội viên mới
Chào các bạn,

Nhờ bạn hỗ trợ chỉnh sửa code vba (vòng lặp) để append dòng từ table 1 vào table2 thõa điều kiện.
Code hiện tại của mình nó chạy mà không stop được vòng lặp.
File gửi đính kèm.

+ tblNghiDaiHan: có [MSNV],[TuNgay],[DenNgay],[MVM]: nhân viên nghỉ từ ngày đến ngày, mã lý do nghỉ
+ tblLyDoCC: [MSNV],[NgayLD],[MVM],[In],[Out]:
Yêu cầu:
- Lấy [MSNV], [TuNgay],[DenNgay] từ tblNghiDaiHan append vào tblLyDoCC với điều kiện field [DaLuu]=0 (nếu MSNV nào đã lưu lần trước rồi thì không lưu nữa - [DaLuu]=1).
- Trong đó mỗi ngày nghỉ phát sinh trong [TuNgay][DenNgay] sẽ là 1 dòng trong tblLyDoCC (cùng MSNV). vd: Nhân viên ABC nghỉ 3 ngày sẽ là 3 dòng trong tblLyDoCC

Tôi tự học VBA nên code có thể lộn xộn, dài dòng các bạn chỉnh sửa giùm.
Cảm ơn nhiều.
 

Đính kèm

  • Sample.accdb.zip
    170.8 KB · Lượt xem: 287
Hi xuanthanh,
[DaLuu] nằm trong tblNghiDaiHan.
xuanthanh hỗ trợ nhé.
tks.
 

CẨM NANG KẾ TOÁN TRƯỞNG


Liên hệ: 090.6969.247

KÊNH YOUTUBE DKT

Kỹ thuật giải trình thanh tra BHXH

Đăng ký kênh nhé cả nhà

SÁCH QUYẾT TOÁN THUẾ


Liên hệ: 090.6969.247

Top