Giúp đỡ hàm xác định học lực

Liên hệ QC

yeu_excel

Thành viên chính thức
Tham gia
17/10/10
Bài viết
66
Được thích
4
Ngày 12/12/2011 BGD ra thông tư 58/2011/TT-BGDĐT quy định về xếp loại như sau:
Điều 13. Tiêu chuẩn xếp loại học kỳ và xếp loại cả năm học
1. Loại giỏi, nếu có đủ các tiêu chuẩn sau đây:
a) Điểm trung bình các môn học từ 8,0 trở lên, trong đó điểm trung bình của 1 trong 2 môn Toán, Ngữ văn từ 8,0 trở lên; riêng đối với học sinh lớp chuyên của trường THPT chuyên phải thêm điều kiện điểm trung bình môn chuyên từ 8,0 trở lên;
b) Không có môn học nào điểm trung bình dưới 6,5;
c) Các môn học đánh giá bằng nhận xét đạt loại Đ.
2. Loại khá, nếu có đủ các tiêu chuẩn sau đây:
a) Điểm trung bình các môn học từ 6,5 trở lên, trong đó điểm trung bình của 1 trong 2 môn Toán, Ngữ văn từ 6,5 trở lên; riêng đối với học sinh lớp chuyên của trường THPT chuyên phải thêm điều kiện điểm trung bình môn chuyên từ 6,5 trở lên;
b) Không có môn học nào điểm trung bình dưới 5,0;
c) Các môn học đánh giá bằng nhận xét đạt loại Đ.
3. Loại trung bình, nếu có đủ các tiêu chuẩn sau đây:
a) Điểm trung bình các môn học từ 5,0 trở lên, trong đó điểm trung bình của 1 trong 2 môn Toán, Ngữ văn từ 5,0 trở lên; riêng đối với học sinh lớp chuyên của trường THPT chuyên phải thêm điều kiện điểm trung bình môn chuyên từ 5,0 trở lên;
b) Không có môn học nào điểm trung bình dưới 3,5;
c) Các môn học đánh giá bằng nhận xét đạt loại Đ.
4. Loại yếu: Điểm trung bình các môn học từ 3,5 trở lên, không có môn học nào điểm trung bình dưới 2,0.
5. Loại kém: Các trường hợp còn lại.
6. Nếu ĐTB[SUB]hk[/SUB] hoặc ĐTB[SUB]cn[/SUB] đạt mức của từng loại quy định tại các Khoản 1, 2 điều này nhưng do kết quả của một môn học nào đó thấp hơn mức quy định cho loại đó nên học lực bị xếp thấp xuống thì được điều chỉnh như sau:
a) Nếu ĐTB[SUB]hk[/SUB] hoặc ĐTB[SUB]cn[/SUB] đạt mức loại G nhưng do kết quả của một môn học nào đó mà phải xuống loại Tb thì được điều chỉnh xếp loại K.
b) Nếu ĐTB[SUB]hk[/SUB] hoặc ĐTB[SUB]cn[/SUB] đạt mức loại G nhưng do kết quả của một môn học nào đó mà phải xuống loại Y thì được điều chỉnh xếp loại Tb.
c) Nếu ĐTB[SUB]hk[/SUB] hoặc ĐTB[SUB]cn[/SUB] đạt mức loại K nhưng do kết quả của một môn học nào đó mà phải xuống loại Y thì được điều chỉnh xếp loại Tb.
d) Nếu ĐTB[SUB]hk[/SUB] hoặc ĐTB[SUB]cn[/SUB] đạt mức loại K nhưng do kết quả của một môn học nào đó mà phải xuống loại Kém thì được điều chỉnh xếp loại Y.

Trước đây, mình đã tham khảo trên diễn đàn có code tạo hàm mới để xác định học lực như sau:
Function XLHL(RangeDiem As Range, TB, Toan, Van) As String
duoi20 = Application.WorksheetFunction.CountIf(RangeDiem, "<20")
duoi35 = Application.WorksheetFunction.CountIf(RangeDiem, "<35")
duoi50 = Application.WorksheetFunction.CountIf(RangeDiem, "<50")
duoi65 = Application.WorksheetFunction.CountIf(RangeDiem, "<65")
If TB >= 80 And (Toan >= 80 Or Van >= 80) And duoi65 = 0 Then
XLHL = "G"
'Diem TB tren 80, 1 trong 2 mon Van, Toan tu 80 tro len, khong mon nao duoi 65
ElseIf TB >= 80 And duoi65 = 1 And duoi50 = 1 And duoi35 = 0 Then
XLHL = "K"
'Diem TB tren 80 (G), do 1 mon hoc phai xuong TB -> Kha
ElseIf TB >= 80 And duoi65 = 1 And duoi50 = 1 And (duoi35 = 1 Or duoi20 = 1) Then
XLHL = "Tb"
'Diem TB tren 80 (G), do 1 mon hoc phai xuong Yeu hoac Kem -> TB
ElseIf TB >= 65 And (Toan >= 65 Or Van >= 65) And duoi50 = 0 Then
XLHL = "K"
'Diem TB tren 65, 1 trong 2 mon Van, Toan tu 65 tro len, khong mon nao duoi 50 -> Kha
ElseIf TB >= 65 And duoi50 = 1 And duoi35 = 1 And duoi20 = 0 Then
XLHL = "Tb"
'Diem TB tren 65 (K), do 1 mon hoc xuong loai Yeu -> Tb
ElseIf TB >= 65 And duoi50 = 1 And duoi35 = 1 And duoi20 = 1 Then
XLHL = "Y"
'Diem TB tren 65 (K), do 1 mon hoc xuong loai Kem -> Yeu
ElseIf TB >= 50 And (Toan >= 50 Or Van >= 50) And duoi35 = 0 Then
XLHL = "Tb"
'Diem TB tren 50, 1 trong 2 mon Van, Toan tu 50 tro len, khong mon nao duoi 35 -> Tb
ElseIf TB >= 35 And duoi20 = 0 Then
XLHL = "Y"
'Diem TB tren 35, khong mon nao duoi 20 -> Yeu
Else
XLHL = "Kém"
'Cac truong hop con lai
End If
End Function

Mình có gửi 1 file mẫu, nhờ các bạn trên diễn đàn nghiên cứu chỉnh sửa giúp. Các ô màu hồng trong file là các ô cần tạo công thức. Xin cám ơn rất nhiều!
(Mong mod đừng xóa bài của em, vì chỉ còn 2 tuần nữa hết kì 1 mà hiện nay em chưa hoàn thành cách tính điểm, em đợi mãi mà chưa thấy ai giúp đỡ)
 

File đính kèm

  • DG-XL TT58.xls
    82 KB · Đọc: 37
Bạn nói rõ hơn về yêu cầu của mình được không? Thế còn những môn đánh giá bằng nhận xét thì thế nào?
 
Upvote 0
Web KT
Back
Top Bottom