Bảng điểm THPT qui chế 40,nhờ các bạn viết giúp 1 hàm học lực?

Liên hệ QC
Bạn vào Tool/ Option/ Advanced/ Thay số 2 trong Autormatically insert a decimal point thành số 1. Chúc thành công
 
Mình gợi ý như thế này nhé (Vì không down được file attac của bạn).Bạn tạo một vùng cơ sợ dữ liệu có các tiêu chuẩn về điểm và học lựcsau đó bạn dùng hàm Vlookup, kết hợp với hàm ifCú pháp: =Vlookup(đ/k,vùngthamchieu,if(đ/k,cot2,cot3),0)chúc bạn thành công.
 
XL Học lực: Qui chế 40 cho cả THPT và THCS

voda đã viết:
Mình xin tóm tắt quy định về xếp loại học lực của học sinh THPT theo quy chế 40 để các bạn ngoài ngành khỏi mất công đọc văn bản:
1.LOẠI GIỎI: phải đủ 3 điều kiện:
-Điểm TB các môn: 8,0 trở lên.
-Điểm 1 trong 2 môn Văn, Toán: 8,0 trở lên.
-Không có môn nào dưới 6,5.
2.LOẠI KHÁ:
-Điểm TB các môn: 6,5 trở lên.
-Điểm 1 trong 2 môn Văn, Toán: 6,5 trở lên.
-Không có môn nào dưới 5,0.
3.LOẠI TB:
-Điểm TB các môn: 5,0 trở lên.
-Điểm 1 trong 2 môn Văn, Toán: 5,0 trở lên.
-Không có môn nào dưới 3,5.
4.LOẠI YẾU:
-Điểm TB các môn:3,5 trở lên.
-Không có môn nào dưới 2,0.
5.LOẠI KÉM: Những trường hợp còn lại.
6.Một số trường hợp cần nâng bậc:
-Nếu ĐTB loại GIỎI (8,0 trở lên), có điểm 1 môn làm cho xuống loại TB thì xếp KHÁ.
-Nếu ĐTB loại GIỎI (8,0 trở lên), có điểm 1 môn làm cho xuống loại YẾU hoặc KÉM thì xếp TB.
-Nếu ĐTB loại KHÁ, có điểm 1 môn làm cho xuống loại YẾU thì xếp TB.
-Nếu ĐTB loại KHÁ, có điểm 1 môn làm cho xuống loại KÉM thì xếp YẾU.
Nhấp chuột vào đây để mở rộng...

EM làm thế này, các bác xem thế nào rồi cho ý kiến để em học hỏi thêm
 

File đính kèm

  • QC40 THPT-THCS.xls
    35.5 KB · Đọc: 87
Hỗ trợ công tác CNLớp THCS (vùng nông thôn)

boyxin đã viết:
EM làm thế này, các bác xem thế nào rồi cho ý kiến để em học hỏi thêm
Nhấp chuột vào đây để mở rộng...

Đây là File có sử dụng VBA để xếp loại HỌC LỰC (VBA cua bác phamduylong)chỉnh sửa như sau:
Function XLHL(RangeDiem As Range, Toan, Van, Tb) As String
mon = RangeDiem.Cells.Count
duoi20 = Application.WorksheetFunction.CountIf(RangeDiem, "<2")
duoi35 = Application.WorksheetFunction.CountIf(RangeDiem, "<3.5")
duoi50 = Application.WorksheetFunction.CountIf(RangeDiem, "<5")
duoi65 = Application.WorksheetFunction.CountIf(RangeDiem, "<6.5")
If Tb >= 8 And (Toan >= 8 Or Van >= 8) And duoi65 = 0 Then
XLHL = "G"
ElseIf Tb >= 8 And (Toan >= 8 Or Van >= 8) And duoi65 = 1 And duoi50 = 1 And duoi35 = 0 Then
XLHL = "K"
ElseIf Tb >= 8 And (Toan >= 8 Or Van >= 8) And duoi65 = 1 And duoi50 = 1 And duoi35 = 1 Then
XLHL = "TB"
ElseIf Tb >= 6.5 And (Toan >= 6.5 Or Van >= 6.5) And duoi50 = 0 Then
XLHL = "K"
ElseIf Tb >= 6.5 And (Toan >= 6.5 Or Van >= 6.5) And duoi50 = 1 And duoi35 = 1 And duoi20 = 0 Then
XLHL = "TB"
ElseIf Tb >= 6.5 And (Toan >= 6.5 Or Van >= 6.5) And duoi50 = 1 And duoi35 = 1 And duoi20 = 1 Then
XLHL = "Y"
ElseIf Tb >= 5 And (Toan >= 5 Or Van >= 5) And duoi35 = 0 Then
XLHL = "TB"
ElseIf Tb >= 3.5 And duoi20 = 0 Then
XLHL = "Y"
Else
XLHL = "Kém"
End If
End Function
Nhấp chuột vào đây để mở rộng...
các bác xem thế nào rồi cho ý kiến

Download File: Mục 3 phần chũ ký
 
Lần chỉnh sửa cuối:
boyxin đã viết:
Còn đây là File có sử dụng VBA để xếp loại HỌC LỰC (VBA cua bác phamduylong) phải chỉnh sửa mới chạy đúng
http://www.giaiphapexcel.com/forum/attachment.php?attachmentid=8435&d=1205721150
Nhấp chuột vào đây để mở rộng...
Đã chỉnh lại hàm xếp loại:
Mã: 
Function XL40(RangeDiem As Range, Toan As Double, Van As Double, Tb) As String
If Tb = "" Or WorksheetFunction.CountIf(RangeDiem, "v") Then
  XL40 = "-"
  Exit Function
End If
duoi20 = WorksheetFunction.CountIf(RangeDiem, "<2")
duoi35 = WorksheetFunction.CountIf(RangeDiem, "<3.5")
duoi50 = WorksheetFunction.CountIf(RangeDiem, "<5")
duoi65 = WorksheetFunction.CountIf(RangeDiem, "<6.5")
If Tb >= 8 And (Toan >= 8 Or Van >= 8) And duoi65 = 0 Then
  XL40 = "G"
ElseIf Tb >= 6.5 And (Toan >= 6.5 Or Van >= 6.5) And duoi50 = 0 Then
  XL40 = "K"
ElseIf Tb >= 5 And (Toan >= 5 Or Van >= 5) And duoi35 = 0 Then
  XL40 = "TB"
ElseIf Tb >= 3.5 And duoi20 = 0 Then
  XL40 = "Y"
Else
  XL40 = "Kém"
End If
'Xet nang bac loai Gioi
If Tb >= 8 And (Toan >= 8 Or Van >= 8) And duoi65 = 1 Then
  If XL40 = "TB" Then
    XL40 = "K"
  ElseIf XL40 = "Y" Or XL40 = "Kém" Then
    XL40 = "TB"
  End If
'Xet nang bac loai Kha
ElseIf Tb >= 6.5 And (Toan >= 6.5 Or Van >= 6.5) And duoi50 = 1 Then
  If XL40 = "Y" Then
    XL40 = "TB"
  ElseIf XL40 = "Kém" Then
    XL40 = "Y"
  End If
End If
End Function
Tôi viết nhưng không sử dụng nó, các bạn kiểm tra lại.
 

File đính kèm

  • Ex TT40.xls
    46.5 KB · Đọc: 87
Trao đổi kiến thức Excel

tuaxedo2910 đã viết:
theo qui chế 40 thì khi hs bị điểm thành phần khống chế bị hạ xuống 2 bậc thì chỉ hạ xuống 1 bậc,ví dụ: hs A được điểm tổng kết là 7.0 nhưng có môn <=3.5 thì bị xuồng loại "trung bình" chứ không phải là kém,các cao thủ làm ơn viết giùm tui lại phần xếp loại học lực với, xin cám ơn
Nhấp chuột vào đây để mở rộng...
chào bạn mình không phải là cao thủ đâu nhưng mình cũng giới thiệu với bạn hàm xếp loại theo qui chế 40 cho ban tham khảo
 
Xep Loai theo quy che 40

Lần thứ nhất xếp loại bình thường như thế này:

=IF(AND(BJ7>=8,OR(AV7>=8,BA7>=8),MIN(AV7:BI7)>=6.5,BJ7<>" "),"Giỏi",IF(AND(BJ7>=6.5,OR(AV7>=6.5,BA7>=6.5),MIN(AV7:BI7)>=5,BJ7<>" "),"Khá",IF(AND(BJ7>=5,OR(AV7>=5,BA7>=5),MIN(AV7:BI7)>=3.5,BJ7<>" "),"TB",IF(AND(BJ7>=3.5,MIN(AV7:BI7)>=2,BJ7<>" "),"Yếu",IF(AND(BJ7>=0,MIN(AV7:BI7)>=0,BJ7<>" "),"Kém"," ")))))

Lần Thứ 2 xét nâng bậc

=IF(AND(BJ7>=8,BK7="Kém"),"TB",IF(AND(BJ7>=8,BK7="Yếu"),"TB",IF(AND(BJ7>=8,BK7="TB"),"Khá",IF(AND(BJ7>=6.5,BK7="Yếu"),"TB",IF(AND(BJ7>=6.5,BK7="Kém"),"Yếu"," ")))))


Lần thứ 3 mới là xếp loại chính:

=IF(BL7<>" ",BL7,BK7)

Sau đó ẩn cột xếp lần 1 và lần 2 đi
xong
 
Mình đang tổng hợp chủ nhiệm nên có sửa lại đôi chút, nay mình gởi lên các bạn tham khảo. Trường mình lớp 11 không học GDQP, lớp 10 có học nên mình tách riêng ra làm 2 files dùng cho 10 và 11. Mong các bạn cho ý kiến. Mình làm trên Excel 2007.
 

File đính kèm

  • Tong_hop_CN.rar
    205.1 KB · Đọc: 150
Lần chỉnh sửa cuối:
i: Bảng điểm THPT qui chế 40, cao thủ viết giúp 1 hàm học lực,thank Trả Lời Ðề Tài

6.Một số trường hợp cần nâng bậc:
-Nếu ĐTB loại GIỎI (8,0 trở lên), có điểm 1 môn làm cho xuống loại TB thì xếp KHÁ.
-Nếu ĐTB loại GIỎI (8,0 trở lên), có điểm 1 môn làm cho xuống loại YẾU hoặc KÉM thì xếp TB.
-Nếu ĐTB loại KHÁ, có điểm 1 môn làm cho xuống loại YẾU thì xếp TB.
-Nếu ĐTB loại KHÁ, có điểm 1 môn làm cho xuống loại KÉM thì xếp YẾU.[/quote]

Nội dung quyết định 40 về xếp loại học lực , hạnh kiểm học sinh ở phần chiếu cố phải hiểu như thế này (Bản thân nội dung văn bản chưa làm rõ chổ này và đa số người áp dụng đều hiểu nhầm) :
Có thể tóm tắc như sau :
+ Áp dụng chiếu cố : Chỉ dành cho học sinh có xếp loại lọt vào khung Giỏi hoặc Khá nhưng không được vì có 1 môn điểm thấp (Các xếp loại khác như TB, Yếu , Kém thì không chiếu cố ).
+ . . . có 1 môn điểm quá thấp làm cho xếp loại chung phải lọt xuống khung xếp loại ...... thì được chiếu cố ....
 
Sửa lại công thức

Mình sửa lại công thức cho tính điểm TBC và xếp loại cho gọn lại rồi.
Công thức sử dụng thêm 2 hàm là:
CountBlank và SumProduct.
Các bạn tham khảo nhé.
:=\+
 

File đính kèm

  • Bangdiemtonghoptheo quiche40.xls
    93 KB · Đọc: 111
Tôi có làm cho học sinh THCS rồi nhưng không biết đưa lên để các bác xem xét các bác chỉ tôi cách đưa bài lên với. tôi chỉ đưa lên bài hướng dẫn còn phai đính kèm chưa đưa được nếu muốn gửi thư cho tôi.
BAÛNG TOÅNG HÔÏP HOÏC KYØ IVEÀ BÌATTHOÏ VAØ TEÂN LôùpToaùnLyùHoaùSinhVaênSöûÑòaNNGD
CDCNgTDAÂ nhMThTB
cm
HKKeát quaû xeáp loaïi
vaø danh hieäuBoû hoïcSoá ngaøy
nghæHLHKTÑ01Nay H' Bluim6,15,95,16,66,55,26,16,87,26,48,46,186,5KTHSTT02Nguyeãn HuyønhCaûm6,15,15,85,677,54,95,77,96,27,16,486,4TbK-03Thaùi Thò HoàngCuùc6,15,766,976,66,36,68,17,17,96,78,36,9KKHSTT04Siu H' Ñeng6,15,64,86,35,85,45,65,67,85,87,97,36,86,2TbT-05Ksor H' Han6,15,33,25,65,45,15,62,96,85,16,96,35,95,3YK-

tại ô mầu tím dùng công thức sau:
=IF(V5="";"";IF(AND(V5>=8;OR(G5>=8;K5>=8);MIN(G5:U5)>6,4);"G";IF(OR(AND(V5>=8;OR(G5>=8;K5>=8);MIN(G5:U5)>=3,5;COUNTIF(G5:U5;"<5")=1;COUNTIF(G5:U5;">=6.5")=(COUNT(G5:U5)-1));AND(V5>6,4;OR(G5>6,4;K5>6,4);MIN(G5:U5)>=5));"K";IF(OR(AND(V5>=8;OR(G5>=8;K5>=8);MIN(G5:U5)<3,5;COUNTIF(G5:U5;"<3.5")=1);AND(V5>=5;OR(G5>=5;K5>=5);MIN(G5:U5)>3,4);AND(V5>6,4;OR(G5>6,4;K5>6,4);MIN(G5:U5)>=2;COUNTIF(G5:U5;"<3.5")=1);COUNTIF(G5:U5;">6.4")=(COUNT(G5:U5)-1));"Tb";IF(OR(AND(V5>=3,5;MIN(G5:U5)>=2);AND(V5>6,4;OR(G5>6,4;K5>6,4);MIN(G5:U5)<5;COUNTIF(G5:U5;"<2")=1;COUNTIF(G5:U5;">=5")=(COUNT(G5:U5)-1)));"Y";"keùm")))))
 
Lần chỉnh sửa cuối:
Xuân hiếu đã viết:
Tôi có làm cho học sinh THCS rồi nhưng không biết đưa lên để các bác xem xét các bác chỉ tôi cách đưa bài lên với. tôi chỉ đưa lên bài hướng dẫn còn phai đính kèm chưa đưa được nếu muốn gửi thư cho tôi.
BAÛNG TOÅNG HÔÏP HOÏC KYØ IVEÀ BÌATTHOÏ VAØ TEÂN LôùpToaùnLyùHoaùSinhVaênSöûÑòaNNGD
CDCNgTDAÂ nhMThTB
cm
HKKeát quaû xeáp loaïi
vaø danh hieäuBoû hoïcSoá ngaøy
nghæHLHKTÑ01Nay H' Bluim6,15,95,16,66,55,26,16,87,26,48,46,186,5KTHSTT02Nguyeãn HuyønhCaûm6,15,15,85,677,54,95,77,96,27,16,486,4TbK-03Thaùi Thò HoàngCuùc6,15,766,976,66,36,68,17,17,96,78,36,9KKHSTT04Siu H' Ñeng6,15,64,86,35,85,45,65,67,85,87,97,36,86,2TbT-05Ksor H' Han6,15,33,25,65,45,15,62,96,85,16,96,35,95,3YK-

tại ô mầu tím dùng công thức sau:
=IF(V5="";"";IF(AND(V5>=8;OR(G5>=8;K5>=8);MIN(G5:U5)>6,4);"G";IF(OR(AND(V5>=8;OR(G5>=8;K5>=8);MIN(G5:U5)>=3,5;COUNTIF(G5:U5;"<5")=1;COUNTIF(G5:U5;">=6.5")=(COUNT(G5:U5)-1));AND(V5>6,4;OR(G5>6,4;K5>6,4);MIN(G5:U5)>=5));"K";IF(OR(AND(V5>=8;OR(G5>=8;K5>=8);MIN(G5:U5)<3,5;COUNTIF(G5:U5;"<3.5")=1);AND(V5>=5;OR(G5>=5;K5>=5);MIN(G5:U5)>3,4);AND(V5>6,4;OR(G5>6,4;K5>6,4);MIN(G5:U5)>=2;COUNTIF(G5:U5;"<3.5")=1);COUNTIF(G5:U5;">6.4")=(COUNT(G5:U5)-1));"Tb";IF(OR(AND(V5>=3,5;MIN(G5:U5)>=2);AND(V5>6,4;OR(G5>6,4;K5>6,4);MIN(G5:U5)<5;COUNTIF(G5:U5;"<2")=1;COUNTIF(G5:U5;">=5")=(COUNT(G5:U5)-1)));"Y";"keùm")))))
Nhấp chuột vào đây để mở rộng...
Về vấn đề ĐIỂM, XẾP LOẠI THEO QC 40, hỗ trợ công tác chủ nhiệm lớp THCS ...
 
Vào tiện ích tính điểm của nhattan67 đi : hãy thử sử dụng phần mềm dành cho giáo dục.
 
công thức qui chế 40

tuaxedo2910 đã viết:
theo qui chế 40 thì khi hs bị điểm thành phần khống chế bị hạ xuống 2 bậc thì chỉ hạ xuống 1 bậc,ví dụ: hs A được điểm tổng kết là 7.0 nhưng có môn <=3.5 thì bị xuồng loại "trung bình" chứ không phải là kém,các cao thủ làm ơn viết giùm tui lại phần xếp loại học lực với, xin cám ơn
Nhấp chuột vào đây để mở rộng...

Cảm ơn tuaxedo2910 nhé! tôi rất cần nó. vì trước kia tôi không dùng hàm min nên công thức rất dài không đủ.
Nhưng công thức của bạn còn chưa "xếp loại hạ bậc" theo qui chế 40.
Ah, mà làm sao để có được các nút thả chọn : Tốt khá, TB ... của ô hạnh kiểm vậy tuaxedo2910?
 
Điều chỉnh cách xếp loại danh hiệu

npthao đã viết:
Mình sửa lại công thức cho tính điểm TBC và xếp loại cho gọn lại rồi.
Công thức sử dụng thêm 2 hàm là:
CountBlank và SumProduct.
Các bạn tham khảo nhé.
:=\+
Nhấp chuột vào đây để mở rộng...

* Công thức tính TB rất tốt, nhưng danh hiệu thì còn thiếu:
Danh hiệu HSG: Học lực giỏi và hạnh kiểm tốt
Danh hiệu HSTT: Học lực Giỏi và Hạnh kiểm khá, hoặc học lực khá và hạnh kiểm Tốt hoặc khá.
If(and(hl="GIOI",hk="TOT"),"HS GIOI",if(or(and(hl="KHA",or(Hk="TOT",hk="KHA")),and(hk="GIOI",hk="KHA")),"HS TT",""))
* Trường hợp hạ bậc: dùng countif để kiểm tra và lưu ý là 1 môn (một) và các môn vi phạm này không phải là văn hay toán (chỉ có 4 trường hợp thôi).
Ví dụ trường hợp TB đạt loại Giỏi nhưng có 1 môn dưới 5 và >=3.5, học sinh này bị xếp loại TB, chuyển thành Khá như sau:
=IF(COUNTBLANK(D7:O7)<>0,"",IF(AND(P7>=8,OR(I7>=8,D7>=8),MIN(D7:O7)>=6.5),"Giỏi",IF(AND(P7>=8,OR(I7>=8,D7>=8),COUNTIF(D7:O7,">=6.5")>=11,COUNTIF(D7:O7,"<5")=1,MIN(D7:O7)>=3.5),"Khá","Khong")))

* Các cột điểm đều phải làm tròn bằng Round với 1 số lẻ.
* Hiện nay nhiều trường dùng xếp loại bằng chữ để đánh giá (môn thể dục) thì lại càng cực lắm... nhưng các thầy cô thì hãy cố gắng hi hi...
 
Lần chỉnh sửa cuối:
Tôi có giải pháp rồi

=IF(P6="","",IF(AND(MIN(D6:O6)>=6.5,P6>=8,OR(D6>=8,I6>=8)),"GIỎI",IF(OR(AND(MIN(D6:O6)>=5,P6>=6.5,OR(D6>=6.5,I6>=6.5)),AND(P6>=8,COUNTIF(D6:O6,"<6.5")=1,COUNTIF(D6:O6,"<5")=0)),"KHÁ",IF(OR(AND(MIN(D6:O6)>=3.5,P6>=5,OR(D6>=5,I6>=5)),AND(P6>=8,COUNTIF(D6:O6,"<3.5")=1),AND(P6>=6.5,COUNTIF(D6:O6,"<3.5")=1,COUNTIF(D6:O6,"<2")=0)),"TB",IF(OR(AND(MIN(D6:O6)>=2,P6>=3.5),AND(P6>=6.5,COUNTIF(D6:O6,"<2")=1)),"YẾU","KÉM")))))

Tôi viét hàm theo cấu trúc của bạn đã nhập tôi đính kèm theo file đã sữa
 

File đính kèm

  • Bangdiemtonghoptheo quiche40.xls
    95.5 KB · Đọc: 23
Phần xếp loại học lực( tham khảo)

Mình có phần tính điểm, Bạn tham khảo
để ứng dụng trong phần xếp loại
Chúc Bạn thành công
 

File đính kèm

  • tinhdiemCN_QC40.rar
    111.3 KB · Đọc: 43
Lần chỉnh sửa cuối:
Phần xếp loại học lực hcọ sinh THPT(tham khảo)

Cho mình xin lỗi, phần gửi trước còn mật khẩu
mục đích không bị xóa công thức.
Bạn dùng phần gửi sau nhé
Mình không cố ý.
Thân chào
 

File đính kèm

  • tinhdiemCN_QC40.rar
    110 KB · Đọc: 47
Phần xếp loại học lực học sinh THPT(tham khảo)

Cho mình xin lỗi, phần gửi trước còn mật khẩu
Bạn dùng phần gửi sau nhé
Mình không cố ý.
Thân chào
 
Bạn phải đăng nhập hoặc đăng ký để trả lời bài viết tại đây.
Web KT

Bài viết mới nhất

K
Tính tổng có điều kiện
Trả lời
0
Đọc
8
kimson_nb
K
LuuAnh980
  • Question
Code lấy dữ liệu từ 3 file con.
2 3
Trả lời
52
Đọc
651
LuuAnh980
LuuAnh980
S
  • Question
Không lấy đủ dữ liệu bằng kết nối ADO
2
Trả lời
21
Đọc
384
ongke0711
ongke0711
S
Slicer không chuyển qua trạng thái mờ.
Trả lời
2
Đọc
66
SteveNguyen1991
S
H
Kết nối vba với Database host (hiện tại đang làm host web)
Trả lời
2
Đọc
142
Haidang7979
H
Xem thêm…

Facebook

Giaiphapexcel.com

Group

DIỄN ĐÀN GIẢI PHÁP EXCEL Group 1
DIỄN ĐÀN GIẢI PHÁP EXCEL Group 2

Thành viên có số lượng bài viết cao nhất tháng

Thành viên có điểm tương tác cao nhất tháng

Back
Top Bottom