Form tính tổng theo điều kiện (1 người xem)

[fbppi]

Hi ACE,

Em có một file như đính kèm.

Nhờ ACE giúp code vba để có thể tìm và tính tổng.

Điều kiện tính tổng:

Một ngày gồm 3 ca làm việc:
Ca 1: từ 6h->14h
Ca2: từ 14h-> 22h
Ca 3: từ 22h-> 6h sáng ngày hôm sau.

Tìm theo:
Date, Runby, Team, và Unfinished.

Mong anh em giúp đở.

 

[fbppi]

Up cho ACE cho ý kiến

 

[fbppi]

Bạ tải file về giúp nhé.

Thanks

 

[Let'GâuGâu]

bạn có hỏi tôi qua tin nhắn

Có một số cmd sau:

TẠO MỚI: nhờ bạn giúp khi nhấn vào, toàn bộ form về trắng tinh.
XÓA: nhập ms vào ô MS, sau đó bấm Xóa thì record về mã số sẽ xóa.
CHỈNH SỬA: Khi bấm MS vào đó, chọn CHỈNH SỬA, thì sẽ hiện ra record của người đó, sau đó chỉnh sửa và save lại vị trí đo.
TÌM KIếm: giống chỉnh sửa nhưng không thay đổi thông tin.
LƯU LẠI: bấm lưu lại thì nó hỏi Bạn có muốn lưu hay kg? Chọn yes thì lưu, no thì không.

tôi bận quá nên chỉ bạn cách làm, bạn thử làm nha
1- Tao mới

[A6:N1048576].clearcontents

2-3-4: xóa, chỉnh sửa, tìm kiếm dùng Find method

dim ms as range
.......................
set ms=[b:b].find(Textbox1.value,,,1)
if not ms is nothing then
' khi co ms roi thi xoa hang do hay lay thong tin len form

end if