Sửa code lọc dữ liệu trùng và tính tổng bằng VBA theo điều kiện

[Thanh Bình PV]

Nhờ anh/chị trong GPE giúp em với. Ở bài trước bác Snow đã giúp e code lọc dữ liệu trùng và tính tổng. Khổ nỗi là em lại quên điều kiện bắt buộc nên em muốn nhờ anh/chị sửa code giúp e thêm điều kiện nữa ạ. Em cảm ơn.
Đề bài trước : (đã được bác Snow hoàn thành)
- Lọc những đối tượng trùng nhau tại cột C và tính tổng của chúng (cột F) rồi đưa dữ liệu qua sheet "SUMMARY - MATERIALS" và cột đơn vị (cột G) sẽ theo cột C theo range cố định (C41:C80)
- Số sheet thay đổi thất thường (40-80 sheet) nhưng tên bắt đầu đều là ASSB LIST. E k đổi tên được vì nó liên quan tới Header ạ.
Đầu ra mới :
- Lọc những đối tượng trùng nhau tại cột C và tính tổng của chúng (cột F) rồi đưa dữ liệu qua sheet "SUMMARY - MATERIALS" và cột đơn vị (cột G) sẽ theo cột C nếu cột J có chữ "TO SITE" sẽ Lọc và tổng hợp qua sheet "SUMMARY - SITE".
- Range không cố định( bắt đầu từ C41), điểm kết thúc của range sẽ là 1 text ở ô A (ở đây là từ SUM) (Không nhất thiết phải thỏa mãn điều kiện này nếu được thì quá tốt ạ)
Em cảm ơn.

 

[Thanh Bình PV]

Có bác nào giúp em không ạ

 

[Thư Tín]

Có bác nào giúp em không ạ

Trùng có lấy hết không bạn? Hay chỉ lấy 1 giá trị

 

[Thanh Bình PV]

Trùng có lấy hết không bạn? Hay chỉ lấy 1 giá trị

trùng lấy luôn ạ. Nếu trùng nhau tính tổng( cột F) của trùng ạ.

 

[Thư Tín]

Có bác nào giúp em không ạ

Bạn xem đúng ý chưa nhé có gì tính tiếp

 

[Thanh Bình PV]

Bạn xem đúng ý chưa nhé có gì tính tiếp

Sorry a vì đầu ra của e ghi sai. Em chỉ muốn lọc lấy từ C41 trở xuống từ "SUM" thôi ạ copy qua sheet"SUMMARY - MATERIALS" nhưng nếu cột J có từ "TO SITE" thì lọc tính tổng rồi copy qua sheet SITE ạ. Mà range từ ACC - SUM thay đổi thất thường ạ.

 

[Thanh Bình PV]

Nhờ mấy bác giúp hộ em,