Xin giúp đỡ hàm loc trong VBA (1 người xem)

[doibuon51223]

điểm () là điểm lần 1; điểm ngoài là lần điểm thi lần 2;
e muốn lọc " số trình nợ"
điểm dưới 5 là nợ,
vi du: cột B4:môn 1: 6 trình, được 4 điểm => nợ 6 trình
Cột G6: Môn 6: 4 trình, được 4.9 điểm => nợ 4 trình
E cảm ơn các anh, chị

 

[doibuon51223]

a, chị nào biết giúp đỡ e cái, e cảm ơn

 

[Ba Tê]

điểm () là điểm lần 1; điểm ngoài là lần điểm thi lần 2;
e muốn lọc " số trình nợ"
điểm dưới 5 là nợ,
vi du: cột B4:môn 1: 6 trình, được 4 điểm => nợ 6 trình
Cột G6: Môn 6: 4 trình, được 4.9 điểm => nợ 4 trình
E cảm ơn các anh, chị

Thử công thức này cho ô I3

=SUMPRODUCT((B3:H3<5)*($B$2:$H$2)*(ISNUMBER(B3:H3)))

Nếu thi lần 2 mà nhỏ hơn 5 -----> công thức dưới:

=SUM((--IF(ISERROR(FIND(")";B3:H3));B3:H3;REPLACE(B3:H3;1;FIND(")";B3:H3);""))<5)*($B$2:$H$2))
Ctrl+Shift+Enter

 

[chuot0106]

điểm () là điểm lần 1; điểm ngoài là lần điểm thi lần 2;
e muốn lọc " số trình nợ"
điểm dưới 5 là nợ,
vi du: cột B4:môn 1: 6 trình, được 4 điểm => nợ 6 trình
Cột G6: Môn 6: 4 trình, được 4.9 điểm => nợ 4 trình
E cảm ơn các anh, chị

Tại sao lại có điểm lần 1 và lần 2? Có trường hợp nào điểm lần 1 hoặc lần 2 nhỏ hơn 5 không????

 

[chuot0106]

Nếu thi lần 2 mà nhỏ hơn 5 -----> công thức dưới:

=SUM((--IF(ISERROR(FIND(")";B3:H3));B3:H3;REPLACE(B3:H3;1;FIND(")";B3:H3);""))<5)*($B$2:$H$2))
Ctrl+Shift+Enter

Thực ra nếu điểm thi lần 2 nhỏ hơn 5 nhưng nếu điểm lần 1 cao tức cộng điểm lần 1 và lần 2 lớn hơn 5 thì em đoán chắc không phải "Nợ trình" đâu?

 

[Ba Tê]

Thực ra nếu điểm thi lần 2 nhỏ hơn 5 nhưng nếu điểm lần 1 cao tức cộng điểm lần 1 và lần 2 lớn hơn 5 thì em đoán chắc không phải "Nợ trình" đâu?

Chờ tác giả thôi. Thi lần 1>5 mà muốn thi lại lần 2, nhỏ hơn 5 thì "ráng chịu".
Híc! Lu bu quá. Điểm số mà lúc thì Number, lúc thì Text. "Xẩu mình"

 

[doibuon51223]

Vâng xin lỗi anh, vì tạo 1 book mới nên chưa định dạng
khổ cái vẫn có trường hợp thi lần 1 >5; nhưng thi lần 2 nhỏ hơn 5, thì vẫn nợ trình thế mới khổ. E viết cái hàm thế này nhưng nó trả kết quả không chuẩn, chắc do dãy thập phân
"Public Function Xet_TC_DuThiCDN(Daydiemthi As Range) As StringDim Nomon As Boolean
Xet_TC_DuThiCDN = "Ko no mon"
Nomon = False
For i = 1 To Daydiemthi.Count
If Loc(Daydiemthi.Item(i).Value) < 5 Or Loc(Daydiemthi.Item(i).Value) > 10 Then
Nomon = True
End If
Next i
If Nomon Then Xet_TC_DuThiCDN = " * No mon *"
End Function"
Hàm chỉ cần trả về kết quả " Nợ Môn" Hoặc " Không nợ môn" không cần tính số Trình nợ cũng được ạh

 

[ndu96081631]

[h=2]Xin giúp đỡ hàm loc trong VBA[/h]

Vui lòng nghĩ ra được tiêu đề nào thật rõ ràng rồi hẳn đăng bài tiếp nhé
LỌC là LỌC chung chung vậy thôi, chả ai biết LỌC cái gì? Advanced Filter cũng là LỌC, AutoFilter cũng là LỌC, PivotTable cũng có LỌC... vân vân... và... mây mây
Tóm lại: Nói trọng tâm vào vấn đề mình cần hỏi là được rồi