Giúp em viết code tính tổng theo điều kiện.

[huuhien80]

Em mới tập tành macro vẫn chưa thạo. Xin nhờ các bác giúp em với.
Em có bảng đính kèm. Vì số sheets có thể thay đổi hàng ngày nên em không làm sao để làm file tự tính tổng các sheets theo các mã hàng được.
em mới chỉ tổng hợp được lên từ sheets DV1, DV2, DV3 lên tổng hợp. Mỗi lần lại phải đếm số sheets rồi sửa code.
Các bác giúp em khi có nhiều sheets thì vẫn tự động cập nhật lên sheets tổng hợp những mã hàng phát sinh và tổng các sản phẩm theo mã hàng, tổng số tiền theo từng mã hàng lên sheets tổng hợp.
Em cảm ơn các bác nhiều nhiều.

 

[vu_tuan_manh_linh]

Sao phải đếm số sheet làm gì. Bạn khai báo thêm 1 biến (giả sử là ShCount as integer, Sh as Worksheet). Khi đó số sheet là ShCount=ActiveWorkbook.Worksheet.Count, sau đó duyệt qua từng sheet bằng vòng lặp For Each Sh in ActiveWorkbook.

 

[huuhien80]

Cảm ơn bạn. Mình không viết được hàm tính tổng theo điều kiện bạn ạ
Với lại mình chỉ tìm kiếm từ sheets 3 trở đi đến sheets cuối cùng thôi! chứ sheets2 là sheets dữ liệu mình để trống.
Nhờ bạn và các anh chị giúp viết hàm tính tổng theo điều kiện các mã hàng ở cột A.... Mong mọi người giúp đỡ

 

[SA_DQ]

Bạn xem trong file kèm theo của mình

Mình có dời dữ iệu từ [C2] sang [F2] để tiện cho macro làm việc hơn xíu & macro có sẵn tổ hợp fím nóng.

 

[huuhien80]

Hì, cảm ơn bác, em mới học macro nên mới dừng ở chỗ Record macro và edit lại 1 tí, bập bẹ for ... next....
Nhìm hàm của bác thật sự choáng dù sao cũng cảm ơn bác rất nhiều, em còn phải học thêm nữa nữa .......