Xin giúp mã VBA tính tổng nhiều điều kiện.

[mrbomst]

Em xin chào mọi người ạ!
Nhờ mọi người giúp em 1 chút về mã vba tính tổng theo điều kiện cho bảng tính, dữ liệu như hình sau ạ!
Điều kiện nêu ra là tính tổng theo điều kiện mã hàng và mã loại cho tất cả số lượng phát sinh trong kỳ. kết quả trả về ở cột I. trong hình là em đã demo kết quả sau khi tính toán xong.
mong được mọi người giúp đỡ.
em xin cảm ơn ạ!

 

[snow25]

Kính gửi Bác Snow25. nếu như dữ liệu vẫn vậy mà điều kiện thứ 2 chuyển thành hàng ngang như hình sau thì mã này có thể được sửa lại như nào bác nhỉ. nhờ bác hướng dẫn em với ạ!
View attachment 250979

Bạn cho dữ liệu chuẩn lên nhé.Vì hàng ngang nó phải xác định được cột cuối của vùng dữ liệu 2.Mà không có số lượng à bạn.

 

[mrbomst]

Bạn cho dữ liệu chuẩn lên nhé.Vì hàng ngang nó phải xác định được cột cuối của vùng dữ liệu 2.Mà không có số lượng à bạn.

Dạ dữ liệu vẫn nguyên như vậy và mình tính sang sheet khác theo điều kiện như hình sau ạ. không biết có thể sử dụng phương thức

Arr = Sheet1.Range("C4:G" & Sheet1.[C65536].End(3).Row)

để tìm dòng cuối cùng của vùng dữ liệu không ạ.