hỏi về hàm sumit

[Phung Nhu]

vd:ngay 1/1/09 em có khách hàng tên A nợ lần thứ I 5.000.000
Lần thứ II nợ 2000.000
Khách hàng tên B nợ lần thứ I 2.000.000
Nợ lần thứ II 3000.000
cho em hỏi em muốn tính tổng từng khách hàng theo từng ngày phải dùng hàm sum như thế nào
em làm thử như sau
sum(if(ngay=1/1/09,makh="A",số phát sinh),0)
nhung nó không hiểu vậy em phải dùng công thức nào cho đúng

 

[Jimmy]

Phung nhu

Không hiểu bạn bố trí bảng dữ liệu như thế nào, nhưng nếu là có 3 cột: 1 cột ngày, 1 cột mã khách hàng, 1 cột nợ tương ứng thì bạn phải cộng nợ theo 2 điều kiện là ngày và mã khách hàng, bạn phải dùng hàm sumifs(), câu lệnh là:
=sumifs(vùng nợ;vùng ngày;"ngày";vùng mã khách;"mã khách)
ví dụ: =sumifs(C2:C6;A2:A6;"1/1/09";B2:B6;"A")
nhưng như thế này nếu có nhiều ngày, nhiều khách thì rất mất thời gian, cách hay nhất là dùng pivot table, cực nhanh và chính xác

 

[phinguyen79]

vd:ngay 1/1/09 em có khách hàng tên A nợ lần thứ I 5.000.000
Lần thứ II nợ 2000.000
Khách hàng tên B nợ lần thứ I 2.000.000
Nợ lần thứ II 3000.000
cho em hỏi em muốn tính tổng từng khách hàng theo từng ngày phải dùng hàm sum như thế nào
em làm thử như sau
sum(if(ngay=1/1/09,makh="A",số phát sinh),0)
nhung nó không hiểu vậy em phải dùng công thức nào cho đúng

Bạn nên upload file lên, mọi người sẽ dễ trả lời và hướng dẫn cụ thể hơn./.

cheer,:wall:

 

[hauden78]

có thể dùng subtotals nhanh hơn

 

[hailuahd]

Nhờ các bác giúp hộ với, có bảng tính như dính kèm, cần thống kê doanh thu các sản phẩm theo mã sản phẩm, bác nào giúp hộ CT tính với.
cám ơn nhìu:015:

 

[hailuahd]

sao hok gửi được file diínhkèm thế này

 

[thanhhung7879]

Nhờ các bác giúp hộ với, có bảng tính như dính kèm, cần thống kê doanh thu các sản phẩm theo mã sản phẩm, bác nào giúp hộ CT tính với.
cám ơn nhìu:015:

Bạn làm giống như vầy nè.

 

[SA_DQ]

Vì đây là BOX lập trình, nên vầy:

Nhờ các bác giúp hộ, cần thống kê doanh thu các sản phẩm theo mã sản phẩm, bác nào giúp hộ

Option Explicit
[B]Sub SUMIF_()[/B]
 Dim Rng As Range, Clls As Range
 
 Set Rng = Range([C4], [C65500].End(xlUp))
 Rng.AdvancedFilter Action:=xlFilterCopy, CopyToRange:=[G4], Unique:=True
 [H4].Value = [e4].Value
 For Each Clls In Range([G5], [G65500].End(xlUp))
   With Application.WorksheetFunction
      Clls.Offset(, 1).Value = .SumIf(Rng, Clls.Value, Rng.Offset(, 2))
   End With
 Next Clls
[B]End Sub[/B]