Tính tổng theo 3 điều kiện

[tnfsmith]

Chào anh em,
Hiện mình cần tính tổng theo 3 điều kiện như tiêu đề. Mình đã thử dùng SUMPRODUCT nhưng kết quả không như ý, SUMIFS cũng không ok. Anh em nào xem dùm file và hỗ trợ tiếp.
Xin cám ơn!

 

[Lê Duy Thương]

Chào anh em,
Hiện mình cần tính tổng theo 3 điều kiện như tiêu đề. Mình đã thử dùng SUMPRODUCT nhưng kết quả không như ý, SUMIFS cũng không ok. Anh em nào xem dùm file và hỗ trợ tiếp.
Xin cám ơn!

Thử dùng pivot table xem.

 

[tnfsmith]

Em tính dùng ct thay vì Pivot table vì data nó thay đổi liên tục dùng ct sẽ tiện hơn anh. Hoặc có cao thủ thì vba cũng ok

 

[Hoang2013]

Bạn xem theo file; Tính theo DSUM()

 

[eke_rula]

Chào anh em,
Hiện mình cần tính tổng theo 3 điều kiện như tiêu đề. Mình đã thử dùng SUMPRODUCT nhưng kết quả không như ý, SUMIFS cũng không ok. Anh em nào xem dùm file và hỗ trợ tiếp.
Xin cám ơn!

Cho bạn một code về ADO:

Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, [A2:D10000]) Is Nothing Then Exit Sub
    Call filter
End Sub
Sub filter()
Set ado1 = CreateObject("ADODB.connection"): Set ado2 = CreateObject("ADODB.recordset")
With ado1
    If Val(Application.Version) < 12 Then
        .ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & ThisWorkbook.FullName & ";" & _
        "Extended Properties=""Excel 8.0;HDR=No;"
    Else
        .ConnectionString = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" & ThisWorkbook.FullName & ";" & _
        "Extended Properties=""Excel 12.0;HDR=No;"";"
    End If
    .Open
End With
strsql = "Select F1 as NT, F4&space(0) as officecode, F2 as laisuat, sum(F3) as sodu from [Sheet1$A2:D10000] where F3>0 group by F1,F2,F4"
ado2.Open strsql, ado1, 3, 1
[H1] = "NT": [J1] = "laisuat": [I1] = "Officecode": [K1] = "Sodu": [H1:K1].Font.Bold = True
[h2].CopyFromRecordset ado2
End Sub

 

[VetMini]

Em tính dùng ct thay vì Pivot table vì data nó thay đổi liên tục dùng ct sẽ tiện hơn anh. Hoặc có cao thủ thì vba cũng ok

Tiện hơn?
Từ khi tôi biết Excel đến giờ, cái gì làm được bằng Pivot table thì LUÔN LUÔN tiện hơn các cách khác.

Cao thủ?
Không biết sử dụng Pivot table hiệu quả thì chỉ có thể làm cao thủ code thôi chứ không xứng đáng nói mình biết xài Excel

 

[MeThuongNho]

Em tính dùng ct thay vì Pivot table vì data nó thay đổi liên tục dùng ct sẽ tiện hơn anh. Hoặc có cao thủ thì vba cũng ok

Chào anh em,
Hiện mình cần tính tổng theo 3 điều kiện như tiêu đề. Mình đã thử dùng SUMPRODUCT nhưng kết quả không như ý, SUMIFS cũng không ok. Anh em nào xem dùm file và hỗ trợ tiếp.
Xin cám ơn!

Công thức Sumproduct tính được mà bạn.
=SUMPRODUCT((C2:C884)*(B2:B884=I8)*(D2884=H8)*(A2:A884=J8))
C: là vùng tính tổng: A,B,D, là vùng điều kiện.