Lỗi Value trong hàm Sumifs

[Ba Tê]

A ơi, chỉ giúp INDEX thay OFFSET với vì áp dụng vào trường hợp thực tế của mình thì 2 sheets nên OFFSET ko chạy được.
Của mình thì data SUM ở 1 sheet, và ô công thức cần SUM ở 1 sheet khác.
Cảm ơn anh!

Làm theo file bài #15, nếu file bài #1 thì nên dùng VBA.

 

[Emyeuexcel]

Chào anh Ba Tê,

Em làm được rồi.
Đội ơn anh!
tại AD7 =SUMIF(Report!$J$1:$JD$1,Weekly!AD$1,INDEX(Report!$J$9:$JD$703,MATCH(Weekly!$E7,Report!$I$9:$I$703,0),))

 

[nguyen6571gpex]

Chào các anh chị em GPE!
Nhờ các bạn chỉ giúp tại sao vùng A79 và A2224 hàm SUMIFS không trả về kết quả.
Trong file có code XOADULIEU mình ghi lại nên dài quá và chạy chậm mong các bạn tối ưu giúp.
Chúc các bạn ngày đầu tháng mới tràn đầy niềm vui. Cảm on!

 

[bebo021999]

Chúc các bạn ngày đầu tháng mới tràn đầy niềm vui. Cảm on!

Giật mình, vội kiểm tra thẻ xem lương vô chưa mà không thấy. Mới 24/11 mà.

Nhờ các bạn chỉ giúp tại sao vùng A79 và A2224 hàm SUMIFS không trả về kết quả.

Dòng 73:75, các hàm Sumproduct đang tham chiếu lặp lên vùng tổng ( dòng 5:54), trong khi vùng tổng này đang tham chiếu đến các dòng này
Sửa lại là OK

Về code của bạn, có rất nhiều dòng lặp lại của "With Selection", xóa bớt đi, giữ lại 1 cái thôi

Sub XoaDuLieu()
    Range("A24:Ad83").Select
    With Selection
        .ClearContents
        .UnMerge
        .Interior.Pattern = xlNone
        .Interior.TintAndShade = 0
        .Interior.PatternTintAndShade = 0
        .Borders(xlDiagonalDown).LineStyle = xlNone
        .Borders(xlDiagonalUp).LineStyle = xlNone
        .Borders(xlEdgeLeft).LineStyle = xlNone
        .Borders(xlEdgeTop).LineStyle = xlNone
        .Borders(xlEdgeBottom).LineStyle = xlNone
        .Borders(xlEdgeRight).LineStyle = xlNone
        .Borders(xlInsideVertical).LineStyle = xlNone
        .Borders(xlInsideHorizontal).LineStyle = xlNone
        .HorizontalAlignment = xlGeneral
        .VerticalAlignment = xlCenter
        .WrapText = False
        .Orientation = 0
        .AddIndent = False
        .IndentLevel = 0
        .ShrinkToFit = False
        .ReadingOrder = xlContext
        .MergeCells = False
    End With
    Range("A25").Select
End Sub

 

[nguyen6571gpex]

Giật mình, vội kiểm tra thẻ xem lương vô chưa mà không thấy. Mới 24/11 mà.


Dòng 73:75, các hàm Sumproduct đang tham chiếu lặp lên vùng tổng ( dòng 5:54), trong khi vùng tổng này đang tham chiếu đến các dòng này
Sửa lại là OK

Về code của bạn, có rất nhiều dòng lặp lại của "With Selection", xóa bớt đi, giữ lại 1 cái thôi

Sub XoaDuLieu()
    Range("A24:Ad83").Select
    With Selection
        .ClearContents
        .UnMerge
        .Interior.Pattern = xlNone
        .Interior.TintAndShade = 0
        .Interior.PatternTintAndShade = 0
        .Borders(xlDiagonalDown).LineStyle = xlNone
        .Borders(xlDiagonalUp).LineStyle = xlNone
        .Borders(xlEdgeLeft).LineStyle = xlNone
        .Borders(xlEdgeTop).LineStyle = xlNone
        .Borders(xlEdgeBottom).LineStyle = xlNone
        .Borders(xlEdgeRight).LineStyle = xlNone
        .Borders(xlInsideVertical).LineStyle = xlNone
        .Borders(xlInsideHorizontal).LineStyle = xlNone
        .HorizontalAlignment = xlGeneral
        .VerticalAlignment = xlCenter
        .WrapText = False
        .Orientation = 0
        .AddIndent = False
        .IndentLevel = 0
        .ShrinkToFit = False
        .ReadingOrder = xlContext
        .MergeCells = False
    End With
    Range("A25").Select
End Sub

Cảm ơn bạn rất nhiều!