Điều này hoàn toàn có thể!Chử đến rồi File ở lại nhé !
Bạn làm gì mà sử dụng 10000 dòng dử vậy ?bao lâu thì được 10000 dòng đó 1 năm hay bao lâu ?
Đến đây nghiên cứu cách post bài nhe
Dử liệu như thế thì khó lòng mà post lên nỗi ..
.
Sub test()
Dim er As Long
er = [b10000].End(xlUp).Row
Range("a" & er + 1, "c" & er + 1).ClearContents
With Cells(er + 1, 1)
.Value = "TOTAL AMOUNT"
.Font.Bold = True
.Size = 15
.Offset(, 1) = Application.WorksheetFunction.SumIf(no, "", amount)
End With
End SubRange("a" & er + 1, "c" & er + 1).ClearContentsRange("a" & er + 1 & ":c" & er + 1).ClearContents.Offset(, 1) = Application.WorksheetFunction.SumIf(no, "", amount).Offset(, 1) = WorksheetFunction.SumIf(Range("no"), "", Range("amount"))Sub test()
Dim er As Long
er = [b10000].End(xlUp).Row
With Range("a" & er + 1 & ":c" & er + 1)
.Clear
.Interior.ColorIndex = 6
.Pattern = xlSolid
End With
er = [b10000].End(xlUp).Row
With Cells(er + 1, 1)
.Value = "TOTAL AMOUNT"
.Font.Bold = True
.Size = 15
.Offset(, 1) = WorksheetFunction.SumIf(Range("no"), "", Range("amount"))
End With
End SubBạn đưa file lên xem thử ---> Vừa sửa và rút gọn code luôn (code này vẫn còn dài)
Sửa lại vầy cho gọn:
Sub Test()
With Range("A65536").End(xlUp).Offset(1)
With .Resize(, 3)
.Clear: .Interior.ColorIndex = 6: .Font.Bold = True: .Font.Size = 15
End With
.Offset(, 1) = "TOTAL AMOUNT"
.Offset(, 2) = WorksheetFunction.SumIf(Range("No"), "", Range("Amount"))
End With
End SubName động mà người ta thường ứng dụng nhiều nhất là trong Validation list! Hãy thử tưởng tượng tình huống này:
Tớ làm ví dụ ở bài 1 theo đúng ý bạn, bạn xem có áp dụng được gì không ?
Mình làm theo sumproduct của bài này thì không được đối với bài trong file đính kèm, không biết tại sao nó lại sum hết (chỉ dò tìm điều kiện hàng 3) mà không bao gồm điều kiện của hàng 2
Bạn thử công thức này xem:
L4 =SUMPRODUCT(N(OFFSET($B4,,(ROW(INDIRECT("1:"&INT(COLUMNS($B4:$K4)/5)))-1)*5+COLUMNS($A:A)-1)))Sửa lại công thức tại E34 tí là xong!
với 2 điều kiện là hàng 2 và hàng 3 (VD như ĐK là BUDGET (hàng 2) và Unit (hàng 3).
Công thức ở V4 cho kết quả sai là đúng rồi. Bởi vì bạn ấy đã sao chép nguyên xi công thức từ Q4 sang.
nên em sợ em cũng không biết cách tạo VBA trên file thật của em
Sao bạn không giãi thích luôn về sheet Sum du lieu trungEm nghĩ là bác BNTT hiểu sai ý em rồi, vì YTD (year to date) FEB, Q4 phải sum (theo điều kiện) cho cột Unit va Value (tháng 1 + tháng 2), còn YTD MAR thì phải là tháng 1+2+3 .... nên vẫn phải là $B : ? (ô của tháng 12)
@ Cop: Có vẻ bác hiểu ý em, nhưng chỉ đúng cho V4 mà không đúng với W va Y (cột value) vì em được giải thích là merge cell thì ô W2 sẽ hiểu là 0.
@Ndu: em không biết tí gì về VBA hết
Bình xem giải pháp của hoangvuluan tại bài số #9:
Thế sao bạn không search, với từ khóa:
Thì giống SUMIF đấy ---> SUMIF thường bạn làm thế nào thì hàm này y chang (tải file về xem là biết liền)
Công thức tại ô I6 :
=SUMIF($C$4:$C$9,H6&"*",$D$4:$D$9)=Sumproduct((month(vùng ngày tháng)=8)*(vùng sản phẩm=sản phẩm)*vùng số lượng)Khi ấy ta không dùng SUMIF được đâu mà dùng SUMPRODUCT
Nếu nói là còn có thể dùng cách khác, thì được, chứ với em, thì giữa cách dùng dấu * và --, chẳng có cái nào "hợp lý hơn" cái nào đâu anh à, chẳng qua là thói quen thôi.
Cho e hỏi cái dấu -- thể hiện cái gì vậy???
Với hàm Sumif() nếu điều kiện là một biểu thức so sánh thì biểu thức so sánh đó phải là dạng chuỗi (nghĩa là bạn phải cho biểu thức so sánh vào hai dấu "). Vì vậy, công thức của bạn phải sửa lại như thế này:
=SUMIF(A1:C6,"<"&MIN(A4:C4),C1:C6)Hàm này bình thường mà... Nếu báo lổi có lẻ sai định dạng về dấu phân cách công thức!
Việc nối chuổi theo kiểu =SUMIF(B1:B26,A1&"*",C1:C26) chỉ cho kết quả nếu vùng B1:B26 là dạng TEXT
1. Thứ nhất, các hạ sai ngay tại điều kiện sumif:
Vùng B1:B26 là kiểu dữ liệu số (Number), trong khi A1&"*" là kiểu dữ liệu chuỗi (String) thì làm sao mà SUMIF được.
LEFT(B1:B26) trả về dạng chuỗi (String) trong khi A1 là kiểu dữ liệu số (Number)
Giờ thí nghiệm thế này nhé:
=SUMPRODUCT(--(LEFT(B1:B26,2)=A1)*(C1:C26))=SUMPRODUCT((--LEFT(B1:B26,2)=A1)*(C1:C26))Hic hic, hỏng biết Châu Bá Thông lên núi lâu quá rồi có đãng trí không...
Khà khà! Tại hạ đúng là "tay run" rồi, có hai dấu "--" mà cũng bỏ nhầm chỗ! Thiệt là khổ quá đi à! Đa tạ BNTT các hạ đã chiếu cố cho tại hạ. Đúng là phải để "--" nằm kế trước chữ LEFT ấy! Tại hạ xuất chiêu nhanh quá nên nhầm, mong bằng hữu bỏ qua cho.
