Tạo chương trình xét công nhận tốt nghiệp THCS (1 người xem)

[khaothibaclieu]

Nhờ các bạn giúp mình tạo ra chương trình xét công nhận tốt nghiệp THCS theo yêu cầu sau:

1. Dữ liệu đầu vào: Theo file gửi kèm. Chỉ xét đối tượng đang học lớp 9 tại các trường THCS.
Nếu tạo được form nhập dữ liệu thì càng tốt.
2. Yêu cầu xử lý:
2.1 Công nhận tốt nghiệp học sinh:
- Xếp loại hạnh kiểm cả năm lớp 9 từ trung bình trở lên.
- Xếp loại học lực cả năm lớp 9 từ trung bình trở lên. Nếu thuộc đối tượng được hưởng ưu tiên, khuyến khích thì học sinh học lực yếu nhưng các môn học tính điểm trung bình đạt từ 3,5 điểm trở lên, trong đó môn toán hoặc môn ngữ văn đạt từ 5,0 điểm trở lên.
2.2 Xếp loại tốt nghiệp:
a. Loại giỏi: Hạnh kiểm loại tốt, học lực loại giỏi.
b. Loại khá: Hạnh kiểm loại khá, học lực loại khá hoặc hạnh kiểm loại khá, học lực loại giỏi.
c. Loại trung bình: Các trường hợp còn lại.
3. Yêu cầu xuất ra:
- Bảng ghi điểm (xếp tên theo qui tắc xếp chữ cái ABC).
- Danh sách học sinh được công nhận tốt nghiệp (xếp tên theo qui tắc xếp chữ cái ABC).
- Giấy chứng nhận tạm thời.
Mong các cao thủ giúp đỡ. Cám ơn rất nhiều.

 

[khaothibaclieu]

Gửi file đính kèm cho xét tốt nghiệp THCS

Xin lỗi. Vì là newbee nên mình chưa biết cách gửi kèm file.

 

[phamduylong]

khaothibaclieu yêu cầu nhiều nhưng không gởi mẫu làm sao giúp được ? Xét tốt nghiệp có nhiều cách viết (hàm, VBA) nhưng mẫu thì không thể tự chế được !

 

[chibi]

Việc xét tốt nghiệp THCS hoàn toàn có thể làm trên Excel bằng công thức (Tôi sẽ post quy chế lên để các bạn cùng tham gia xây dựng).
Đôi điều tham gia với khaothibaclieu: Tại sao phải tách họ đệm và tên riêng? Nên tách ƯT và KK (Điều này rất cần thiết khi dữ liệu này dùng cho thi hoặc xét tuyển vào THPT).
...

 

[khaothibaclieu]

To chibi
Tách cột họ tên ra để dể dàng trong việc sắp xếp họ tên. Còn nếu bạn chibi nghĩ không cần tách cột họ tên để sau này dùng hàm/VBA để tách ra rồi sắp xếp thì cũng được. Nhớ chỉ cho mình cách đó. Cám ơn lắm lắm.
Mình nghĩ không cần thiết phải để rõ diện ưu tiên, khuyến khích vì chỉ cần có điều này là thí sinh chỉ cần có học lực yếu nhưng trung bình môn từ 3,5 trở lên và Văn hoặc Toán 5,0 trở lên là được. Vì chương trình chỉ dùng cho các trường THCS nên không cần thiết phục vụ cho chuyện xét/ thi tuyển sinh của các trường THPT.
To PhamDuyLong:
Mình sẽ gửi mẫu. Cám ơn.

 

[khaothibaclieu]

Các yêu cầu cụ thể để tạo chương trình xét tốt nghiệp THCS

Mình đã tạo mẫu cụ thể (gửi kèm) và nhờ các bạn giúp:
- Ở sheet Nhap DS:
+ Các bạn xem xét và cải tiến giùm mình công thức từ hai cột [Tốt nghiệp] và Cột [TN diện ƯT,KK]. Có cách nào chỉ lập công thức xét tốt nghiệp ở một cột duy nhất không? Nếu tạo hàm Xét tốt nghiệp thì càng tốt (để chương trình thêm chuyên nghiệp í mà).
+ Có cách nào để từ khi người dùng nhập vào cột [Hạnh kiểm] = "Trung bình" và cột [Học lực] = "Yếu" và cột Diện ƯT,KK = "X" thì hiện ra thông báo "Bạn hãy nhập điểm TBM và điểm Văn, Toán" hay đại loại là đổi màu, tô màu dòng dữ liệu đó để nhắc nhở người dùng không nhập thiếu dữ liệu?
- Tạo Hàm "Sắp xếp họ tên" để sắp xếp dữ liệu ở danh sách trên theo abc.
- Từ sheet Nhap DS có thể dùng Advanced Filter để lọc ra 2 danh sách tốt nghiệp: Một là sheet DSTN1 (dành cho các đối tượng tốt nghiệp không phải diện ưu tiên, khuyến khích) và sheet DSTN2 (dành cho các đối tượng tốt nghiệp diện ưu tiên, khuyến khích). Có thể tạo dùm mình các hàm:
- Hàm "Tạo danh sách tốt nghiệp": Trích lọc ra 2 sheet dữ liệu DSTN1 và DSTN2.
- Hàm "Xếp loại tốt nghiệp". Xếp loại theo điều kiện có ở mục lần trước mình đã đề cập.
- Hàm "Đếm số lượng": Tốt nghiệp loại Giỏi, Khá, Trung bình. (Tương đương với dùng công thức countif hoặc sumif).
Cám ơn trước.

 

[boyxin]

Mình đã tạo mẫu cụ thể (gửi kèm) và nhờ các bạn giúp:
- Ở sheet Nhap DS:
+ Các bạn xem xét và cải tiến giùm mình công thức từ hai cột [Tốt nghiệp] và Cột [TN diện ƯT,KK]. Có cách nào chỉ lập công thức xét tốt nghiệp ở một cột duy nhất không? Nếu tạo hàm Xét tốt nghiệp thì càng tốt (để chương trình thêm chuyên nghiệp í mà).
+ Có cách nào để từ khi người dùng nhập vào cột [Hạnh kiểm] = "Trung bình" và cột [Học lực] = "Yếu" và cột Diện ƯT,KK = "X" thì hiện ra thông báo "Bạn hãy nhập điểm TBM và điểm Văn, Toán" hay đại loại là đổi màu, tô màu dòng dữ liệu đó để nhắc nhở người dùng không nhập thiếu dữ liệu?
- Tạo Hàm "Sắp xếp họ tên" để sắp xếp dữ liệu ở danh sách trên theo abc.
- Từ sheet Nhap DS có thể dùng Advanced Filter để lọc ra 2 danh sách tốt nghiệp: Một là sheet DSTN1 (dành cho các đối tượng tốt nghiệp không phải diện ưu tiên, khuyến khích) và sheet DSTN2 (dành cho các đối tượng tốt nghiệp diện ưu tiên, khuyến khích). Có thể tạo dùm mình các hàm:
- Hàm "Tạo danh sách tốt nghiệp": Trích lọc ra 2 sheet dữ liệu DSTN1 và DSTN2.
- Hàm "Xếp loại tốt nghiệp". Xếp loại theo điều kiện có ở mục lần trước mình đã đề cập.
- Hàm "Đếm số lượng": Tốt nghiệp loại Giỏi, Khá, Trung bình. (Tương đương với dùng công thức countif hoặc sumif).
Cám ơn trước.

Tập tin đính kèm đã sửa và đưa xuống bài #11

 

[khaothibaclieu]

Cám ơn bạn boyxin rất nhiều. Nếu được, các bạn cải tiến giùm mình công thức xét tốt nghiệp ở Sheet Nhap DS. Mình phải dùng đến 2 cột để xét tốt nghiệp (cho riêng 2 đối tượng được hưởng ưu tiên, khuyến khích và không được hưởng ưu tiên, khuyến khích). Mình muốn chỉ cần dùng 1 cột để xét tốt nghiệp cho cả hai đối tượng trên.
Nếu ra kết quả như ở hai cột trên là đúng yêu cầu.
Ngoài ra, mình đã chỉnh sửa một số công thức cho đúng qui định (Một số chổ mình tô màu đỏ để bạn boyxin chỉnh cho đúng).
Cám ơn.

 

[boyxin]

Cám ơn bạn boyxin rất nhiều. Nếu được, các bạn cải tiến giùm mình công thức xét tốt nghiệp ở Sheet Nhap DS. Mình phải dùng đến 2 cột để xét tốt nghiệp (cho riêng 2 đối tượng được hưởng ưu tiên, khuyến khích và không được hưởng ưu tiên, khuyến khích). Mình muốn chỉ cần dùng 1 cột để xét tốt nghiệp cho cả hai đối tượng trên.
Nếu ra kết quả như ở hai cột trên là đúng yêu cầu.
Ngoài ra, mình đã chỉnh sửa một số công thức cho đúng qui định (Một số chổ mình tô màu đỏ để bạn boyxin chỉnh cho đúng).
Cám ơn.

Không phải chuyên môn nên không rõ vụ này lắm, không biết thế này đã được chưa?
Tập tin đính kèm đã sửa lỗi VLOOKUP, dùng INDEX và đưa xuống bài #11

 

[khaothibaclieu]

Cám ơn rất nhiều.
Các hàm XetTN và XetUT chạy rất tốt. Nhưng ở sheet DSTN2 vẫn còn trục trặc. Khi dùng VLookup dữ liệu không chính xác (tôi đã bôi màu đỏ các dòng không chính xác.
Bạn kiểm tra lại dùm.
Cám ơn.

 

[boyxin]

Hi
VLOOKUP tìm và thay thế sai: đó là do bạn tách < ho-lot | tên > nên phần tên có hiện tượng trùng lặp
--------------------
SỬA SAI:
THAY HÀM VLOOKUP BẰNG HÀM INDEX SẼ HẾT NGAY

Xem tập tin đính kèm

 

[phamduylong]

Nhờ các bạn giúp mình tạo ra chương trình xét công nhận tốt nghiệp THCS theo yêu cầu sau:
...
3. Yêu cầu xuất ra:
- Bảng ghi điểm (xếp tên theo qui tắc xếp chữ cái ABC).
- Danh sách học sinh được công nhận tốt nghiệp (xếp tên theo qui tắc xếp chữ cái ABC).
- Giấy chứng nhận tạm thời.
Mong các cao thủ giúp đỡ. Cám ơn rất nhiều.

Do số dòng trong danh sách tốt nghiệp không cố định vì số ts tốt nghiệp thay đổi nên viết bằng công thức rất khó. Từ mẫu của khaothibaclieu, tôi viết thủ tục rút danh sách tốt nghiệp sang 2 sheet DSTN1 và DSTN2. Nó sẽ tự động chèn đủ số dòng theo số ts tốt nghiệp và xếp tên theo ABC chuẩn Unicode.
Bạn chạy sub LapDanhSach hoặc nhấn Ctrl+Shft+P.
Trong module1:

- Xét tốt nghiệp

Function TotNghiep(hk, hl) As String
If (hk = "T" & ChrW(7889) & "t" Or hk = "Khá" Or hk = "Trung bình") And (hl = "Gi" & ChrW(7887) & "i" Or hl = "Khá" Or hl = "Trung bình") Then
  TotNghiep = ChrW(272)
Else
  TotNghiep = ""
End If
End Function

- Xét tốt nghiệp thí sinh ưu tiên

Function TotNghiepUT(hk, hl, ut, dtb, van, toan) As String
If (hk = "T" & ChrW(7889) & "t" Or hk = "Khá" Or hk = "Trung bình") And (hl = "Gi" & ChrW(7887) & "i" Or hl = "Khá" Or hl = "Trung bình") Then
  TotNghiepUT = ""
ElseIf ut <> "" And (hk = "T" & ChrW(7889) & "t" Or hk = "Khá" Or hk = "Trung bình" Or hk = "Y" & ChrW(7871)) And dtb >= 3.5 And (toan >= 5 Or van >= 5) Then
    TotNghiepUT = ChrW(272)
Else
  TotNghiepUT = ""
End If
End Function

- Thủ tục lập 2 danh sách in

Sub LapDanhSach()
'
' LapDanhSach Macro
' Macro recorded 17/04/2008 by Pham Duy Long
'
' Keyboard Shortcut: Ctrl+Shift+P
'
Application.ScreenUpdating = False
Set ds = Sheets("Nhap DS")
Set ds1 = Sheets("DSTN1")
Set ds2 = Sheets("DSTN2")
ds1.Select
r = 4
Do
  If Cells(r, 2) = "Ng" & ChrW(432) & ChrW(7901) & "i l" & ChrW(7853) & "p b" & ChrW(7843) & "ng" Then Exit Do
  r = r + 1
Loop
If r > 7 Then
  Range(Cells(6, 1), Cells(r - 2, 1)).EntireRow.Delete
End If
r = 7
rds = 5
Do While ds.Cells(r, 1) <> ""
  If ds.Cells(r, 14) = ChrW(272) Then
    Rows(rds).EntireRow.Insert
    b = 0
    Cells(rds, 1) = rds - 4
    Cells(rds, 2) = ds.Cells(r, 2)
    Cells(rds, 3) = ds.Cells(r, 3)
    Cells(rds, 4) = ds.Cells(r, 4)
    Cells(rds, 5) = ds.Cells(r, 5)
    Cells(rds, 6) = ds.Cells(r, 6)
    Cells(rds, 7) = ds.Cells(r, 7)
    Cells(rds, 8) = ds.Cells(r, 8)
    Cells(rds, 9) = ds.Cells(r, 9)
    If Cells(rds, 8) = "T" & ChrW(7889) & "t" And Cells(rds, 9) = "Gi" & ChrW(7887) & "i" Then
      Cells(rds, 10) = "Gi" & ChrW(7887) & "i"
      gioi = gioi + 1
    ElseIf Cells(rds, 8) = "Khá" And (Cells(rds, 9) = "Gi" & ChrW(7887) & "i" Or Cells(rds, 9) = "Khá") Then
      Cells(rds, 10) = "khá"
      kha = kha + 1
    Else
      Cells(rds, 10) = "Trung bình"
      tb = tb + 1
    End If
    Cells(rds, 11) = SortUni(Cells(rds, 3))
    rds = rds + 1
  End If
  r = r + 1
Loop
Range(Cells(5, 2), Cells(rds, 11)).Sort Key1:=Range("C11"), Order1:=xlAscending, Header:=xlNo, _
        OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
        DataOption1:=xlSortNormal
Cells(rds, 1).EntireRow.Delete
Columns("K").ClearContents
Cells(rds + 1, 6) = Left(Cells(rds + 1, 6), 24) & rds - 5
Cells(rds + 2, 6) = Left(Cells(rds + 2, 6), 11) & gioi
Cells(rds + 3, 6) = Left(Cells(rds + 3, 6), 10) & kha
Cells(rds + 4, 6) = Left(Cells(rds + 4, 6), 17) & tb
ds2.Select
r = 4
Do
  If Cells(r, 2) = "Ng" & ChrW(432) & ChrW(7901) & "i l" & ChrW(7853) & "p b" & ChrW(7843) & "ng" Then Exit Do
  r = r + 1
Loop
If r > 7 Then
  Range(Cells(6, 1), Cells(r - 2, 1)).EntireRow.Delete
End If
r = 7
rds = 5
Do While ds.Cells(r, 1) <> ""
  If ds.Cells(r, 15) = ChrW(272) Then
    Rows(rds).EntireRow.Insert
    b = 0
    Cells(rds, 1) = rds - 4
    Cells(rds, 2) = ds.Cells(r, 2)
    Cells(rds, 3) = ds.Cells(r, 3)
    Cells(rds, 4) = ds.Cells(r, 4)
    Cells(rds, 5) = ds.Cells(r, 5)
    Cells(rds, 6) = ds.Cells(r, 6)
    Cells(rds, 7) = ds.Cells(r, 7)
    Cells(rds, 8) = ds.Cells(r, 8)
    Cells(rds, 9) = ds.Cells(r, 9)
    Cells(rds, 10) = ds.Cells(r, 11)
    Cells(rds, 11) = ds.Cells(r, 12)
    Cells(rds, 12) = ds.Cells(r, 13)
    Cells(rds, 13) = ds.Cells(r, 10)
    Cells(rds, 14) = SortUni(Cells(rds, 3))
    rds = rds + 1
  End If
  r = r + 1
Loop
Range(Cells(5, 2), Cells(rds, 14)).Sort Key1:=Range("C5"), Order1:=xlAscending, Header:=xlNo, _
        OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
        DataOption1:=xlSortNormal
Cells(rds, 1).EntireRow.Delete
Columns("N").ClearContents
Cells(rds + 1, 6) = Left(Cells(rds + 1, 6), 24) & rds - 5
End Sub

 

[khaothibaclieu]

Chương trình của bác rất xuất sắc.
Tuy nhiên, bác kiểm tra dùm xem khi tôi xóa dữ liệu, nhập lại thì công thức của bác bị lỗi. Bác xem file đính kèm.

Ngoài ra, xin các bác chỉ giáo cách: Ở sheet Nhap DS, khi nhập vào một thí sinh Hạnh kiểm: "Trung bình", Học lực: "Yếu"; Diện ƯT,KK: "X" thì xuất ra thông báo: "Nhập điểm Trung bình môn, Điểm Toán và Điểm Văn" hoặc đỗi màu dòng đó cũng được.

 

[phamduylong]

Chương trình của bác rất xuất sắc.
Tuy nhiên, bác kiểm tra dùm xem khi tôi xóa dữ liệu, nhập lại thì công thức của bác bị lỗi. Bác xem file đính kèm.

Nguyên nhân lỗi là trong Module 1 và Module 2 có tên các hàm trùng nhau.
Còn việc chú ý người nhập khi gặp diện học sinh yếu thì dùng Format > Conditinal Formatting.

 

[khaothibaclieu]

Cải tiến chương trình xét tốt nghiệp

Nhờ các bác giúp em với.
Từ các hàm "TotNghiep" và "TotNghiepUT" của thầy Long, em gộp chung lại, có chỉnh sửa đôi chút để có hàm "Totnghiep" chung.
Tuy nhiên, em làm hoài hàm "XepLoai" mà không được. Các bác xem code và giúp đỡ em nhé.
Ngoài ra, vì gộp hai hàm lại nên khi tạo DSTN1 và DSTN2 bị trùng lắp, em chưa biết cách khắc phục để tạo 2 danh sách riêng biệt (DSTN1 = Diện thường; DSTN2 = Diện ƯT,KK).
Nếu đã có hàm "XepLoai" ở sheet NhapDS rồi thì không cần phải có đoạn code xếp loại ở ds1 và ds2 (Đúng không?). Nhờ các bác lưu ý luôn.

 

[khaothibaclieu]

Chương trình xét tốt nghiệp THCS (khá hoàn chỉnh)

Các bạn vào trang http://www.echip.com.vn, mục Download, Phần mềm tự biên tải về phần mềm của thầy Trần Xuân Hùng, giáo viên tỉnh Daklak. Chương trình viết bằng excel, khá hoàn chỉnh.
Tuy nhiên, chúng tôi kiến nghị tác giả bổ sung thêm 1 số yêu cầu của chúng tôi, như sau:
- Chương trình chỉ giới hạn ở mức 325 học sinh. Ở tỉnh chúng tôi, có một số trường có qui mô rất lớn, có khi đến 500 - 600 học sinh lớp 9. Mong anh có cách đừng giới hạn số lượng được không?
- Theo Quy chế Xét tốt nghiệp - Quyết định số 11, cần phải lập danh sách đỗ tốt nghiệp, trong đó tách riêng các danh sách học sinh diện ưu tiên, khuyến khích và tốt nghiệp theo các trường hợp khác (Điều 7). Chương trình của anh còn thiếu điều này.
- Ngoài ra, ở tỉnh chúng tôi, không đòi hỏi phải nhập điểm của tất cả các môn (vì đã có các chương trình tính điểm bộ môn) - Nếu kết hợp được thì tốt. Tuy nhiên, để tiết kiệm thời gian cho các trường, chúng tôi đề nghị anh tiếp tục cho phép các trường có tùy chọn nhập điểm tất cả các môn hay không nhập điểm tất cả các môn, chỉ nhập điểm TBM và môn Văn, Toán (để xét đối tượng ưu tiên, khuyến khích).
Mong các bạn cùng chia sẽ ý kiến.

 

[khaothibaclieu]

Chương trình xét tốt nghiệp THCS v3.1

Đây là chương trình xét tốt nghiệp THCS được hoàn chỉnh bởi thầy Phạm Duy Long. Mọi người có thể down về nghiên cứu và sử dụng. Có gì thì góp ý với.

 

[khaothibaclieu]

Cần điều chỉnh chương trình xét tốt nghiệp THCS

Chương trình xét tốt nghiệp này chưa xét đúng qui chế vì chỉ mới đưa vào dữ liệu điểm trung bình môn Văn, Toán mà chưa xét đủ các môn khác. Do đó, nếu thí sinh có điểm trung bình môn Văn hoặc Toán chuơng trình dưới 3,5 cũng cho đỗ tốt nghiệp luôn.
Cần phải nghiên cứu và chỉnh sửa thêm.

 

[dvu58]

Về xét tốt nghiệp THCS

Từ ý tưởng của khaothibaclieu;
Xin được dùng code của Thầy Phạm Duy Long;
Học tập từ bạn Tedaynui,

Mình có lập CT xét tốt nghiệp THCS, các bạn xem thử.

Hic! Hơi "củ chuối". Xin đừng cười.

 

[phamduylong]

Chương trình xét tốt nghiệp này chưa xét đúng qui chế vì chỉ mới đưa vào dữ liệu điểm trung bình môn Văn, Toán mà chưa xét đủ các môn khác. Do đó, nếu thí sinh có điểm trung bình môn Văn hoặc Toán chuơng trình dưới 3,5 cũng cho đỗ tốt nghiệp luôn.
Cần phải nghiên cứu và chỉnh sửa thêm.

To khaothibaclieu: rút kinh nghiệm trường hợp này. Sau này em phải gởi dữ liệu tổng quát hơn chứ có 2 môn văn, toán dễ hiểu lầm là xhỉ xét có 2 môn đó !

 

[dvu58]

Về xét tốt nghiệp THCS

Thật ra, theo quyết định 11/2006/QĐ-BGĐT
ngày 05.04.2006 của Bộ Giáo Dục & Đào Tạo thì tiêu chuẩn công nhận tốt nghiệp THCS chủ yếu là:

Trích:
b) Tiêu chuẩn:
- Xếp loại hạnh kiểm cả năm học lớp 9 từ trung bình trở lên, đối với diện phải xếp loại hạnh kiểm;
- Xếp loại học lực cả năm lớp 9 từ trung bình trở lên, nếu không thuộc đối tượng được hưởng chính sách ưu tiên, khuyến khích;
- Xếp loại học lực yếu nhưng các môn học tính điểm trung bình đều đạt từ 3,5 điểm trở lên, trong đó môn toán hoặc môn ngữ văn đạt từ 5,0 điểm trở lên, nếu thuộc đối tượng được hưởng chính sách ưu tiên, khuyến khích.

(Vậy thì có cần phải xét thêm các điều kiện nào nữa không?)
Đúng là có sự hiểu lầm rồi: "Xếp loại học lực yếu nhưng các môn học tính điểm trung bình đều đạt từ 3,5 điểm trở lên"
Vậy thì, có lẽ danh sách phải chia thêm một số cột nữa rồi.

 

[dvu58]

Sửa lại Xét TN THCS một chút

Sửa lại một chút và gởi lại CT Xét TN THCS.

Các bạn xem có hợp lý không nhé:
Chuyển cột ĐTBM (ở Danh sách đề nghị xét tốt nghiệp THCS) thành Mã Điều kiện (Mã ĐK): Điều kiện là: Đối với những học sinh xếp loại học lực "Yếu" thì Nếu tất cả các môn học còn lại (trừ Văn và Toán) đều đạt điểm trung bình môn từ 3,5 điểm trở lên thì ghi "3,5" vào cột Mã ĐK.

 

[khaothibaclieu]

Rút kinh nghiệm

Rút kinh nghiệm nghiêm túc vì đưa ra vấn đề từ đầu không rõ ràng. Mong các bạn góp ý tiếp. Cám ơn

 

[dvu58]

Cần bổ sung thêm các tác vụ "XÉT TỐT NGHIỆP THCS LẦN 2"

Thêm cái vụ xét tốt nghiệp lần 2 nữa! Hic! Phiền quá đi mất!

Nhiệm vụ đặt ra:
1. Tạo danh sách xét TN THCS lần 2 cho các học sinh chưa được công nhận TN lần 1.
2. Xét duyệt kết quả:
a. Nếu học lực đạt từ trung bình trở lên thì đạt (được công nhận tốt nghiệp THCS - "Đ")
b. Nếu đạt ("Đ") thì chỉ được xếp loại Trung bình (cho dù xếp loại học lực lại là loại khá, chi chi... đi nữa)
3. Lập danh sách HS TN THCS lần 2 (để chuyển về HĐ xét duyệt Huyện thị, TP xét và công nhận).
4. Lập danh sách theo dõi cấp phát bằng tốt nghiệp.
5. Cập nhật lại danh sách cấp phát bằng, khóa sổ, kết số mới... (có bổ sung thêm số HS mới được công nhận TN THCS lần 2).

 

[dvu58]

Gởi lại file XET TNTHCS

Bổ sung cho xét TN lần 2

 

[nhapdanhsach]

Chương trình này cũng tạm ổn! Tuy nhiên nó chỉ phục vụ xét TN và in ra biểu mẫu. Nhiều trường hợp chưa tính hết theo quy chế.
Tôi đã có một chương trình hoàn thiện được lập bằng VB. Dung lượng lớn không tải lên được.Nếu cần, gọi 0914466922. Tôi tặng bộ cài đặt chưưong trình!

 

[lehung090]

Chương trình này viết rất hay. Nhưng không in ra được bằng chứng nhận tốt nghiệp tạm thời.
Đề nghị bổ xung.

 

[dvu58]

Gởi lại file

Chào các bạn!
Theo đề nghị của bạn lehung090, xin gởi lại file Xet TNTHCS

Bổ sung thêm phần in giấy chứng nhận tốt nghiệp THCS (của chương trình XÉT TỐT NGHIỆP THCS) rồi đây.

Lưu ý: Các trường hợp học sinh không được công nhận tốt nghiệp THCS năm trước đăng ký dự xét trong năm nay thì cho vào lớp "Xét lại" (XL). Vì vậy ở phần nhập danh mục lớp, cần nhập vào cuối cùng của danh sách lớp 1 lớp "XL" (viết tắt của xét lại). Những học sinh trong lớp XL chỉ được công nhận tốt nghiệp loại Trung bình mà thôi.

VD: Nhập danh mục LỚP:
9a1
9a2
9a3
XL

 

[lehung090]

XIn lỗi Thầy Vượng, không biết là có hơi quá không, nhưng tôi thấy vẫn còn cái bất tiện cho người dùng là cứ phải sửa các tên địa danh Đà Lạt vào các báo biểu và các danh sách khi khởi tạo các loại danh sách. Thầy xem có chỉnh sửa lại một chút không.

 

[dvu58]

XIn lỗi Thầy Vượng, không biết là có hơi quá không, nhưng tôi thấy vẫn còn cái bất tiện cho người dùng là cứ phải sửa các tên địa danh Đà Lạt vào các báo biểu và các danh sách khi khởi tạo các loại danh sách. Thầy xem có chỉnh sửa lại một chút không.

Tôi chưa hiểu là bạn khởi tạo danh sách nào và sửa địa danh gì? Có phải phần tiêu đề góc trái phía trên cùng không? Nếu vậy thì:
Bạn chỉ cần sửa (hoặc nhập lại) 1 lần tại sheet ĐẦU TIÊN (phần NHẬP ĐẦY ĐỦ THÔNG SỐ VÀO CÁC Ô DƯỚI ĐÂY) một số ô có sẵn, một số ô bạn phải nhập để lấy thông tin chung cho các biểu mẫu hoặc chương trình.
Tại sheet này, mặc định là địa danh Đà lạt có mục đích như một hướng dẫn thông tin cần nhập hoặc sửa vào đó cho mọi người dễ thấy mà thôi.

Còn cách nữa để sửa chung mỗi lần khởi tạo file. Bạn làm như sau:
1. Mở file XetTN THCS trong thư mục (nếu bạn setup vào ổ dĩa C: C:\XETTNTHCS\Template\XetTN THCS.xls
2. Từ file này, bạn sửa lại tên cơ quan quản lý (Thành phố, Phòng GDĐT)
3. Save rồi thoát ra
...... là xong.
Bây giờ, mỗi lần khởi tạo file, bạn sẽ được tiêu đề chung đó.

 

[lehung090]

Tôi đã thử nhiều lần vào cả Template nhưng khi khởi tạo và nhập học sinh vẫn không được thầy xem giùm
+ Danh sách này có: 1 HS Được đề nghị xét công nhận TN Gồm: 0 HS Nam và 0 HS Nữ + Diện ƯT: 1 HS; Diện KK: 0 HS; Diện ƯT và KK: 0 HS. Trong đó: + Loại Giỏi: 1 HS; Loại Khá: 0 HS; Loại TB: 0 HS. + Số HS TN không cần ƯT, KK là: 1 HS. + Số HS TN do hưởng ƯT: 0 HS; + Số HS TN do hưởng KK: 0 HS + Số HS TN do hưởng ƯT và KK: 0 HS. ( TC có: + Diện ƯT: 0 HS; Diện KK: 0 HS TN THCS) Đà Lạt, ngày tháng năm CHỦ TỊCH HỘI ĐỒNG

 

[dvu58]

Tôi đã thử nhiều lần vào cả Template nhưng khi khởi tạo và nhập học sinh vẫn không được thầy xem giùm
+ Danh sách này có: 1 HS Được đề nghị xét công nhận TN Gồm: 0 HS Nam và 0 HS Nữ + Diện ƯT: 1 HS; Diện KK: 0 HS; Diện ƯT và KK: 0 HS. Trong đó: + Loại Giỏi: 1 HS; Loại Khá: 0 HS; Loại TB: 0 HS. + Số HS TN không cần ƯT, KK là: 1 HS. + Số HS TN do hưởng ƯT: 0 HS; + Số HS TN do hưởng KK: 0 HS + Số HS TN do hưởng ƯT và KK: 0 HS. ( TC có: + Diện ƯT: 0 HS; Diện KK: 0 HS TN THCS) Đà Lạt, ngày tháng năm CHỦ TỊCH HỘI ĐỒNG

Ờ! Chỗ này mình chưa thấy đây. Mình sẽ điều chỉnh lại rồi gởi lại sau.

 

[lehung090]

Sao chưa thấy thầy Vượng hồi âm. Mong thầy hồi âm sớm để chuẩn bị cho kỳ xét tốt nghiệp sắt tới rồi.

 

[dvu58]

Sao chưa thấy thầy Vượng hồi âm. Mong thầy hồi âm sớm để chuẩn bị cho kỳ xét tốt nghiệp sắt tới rồi.

Mấy bữa nay bận tối mắt. Đang chuẩn bị cho thi cử, phúc tra thi đua, kiểm tra trường chuẩn, kiểm định chất lượng trường phổ thông và ....... Nên chi, sửa tàm tàm tạm để gởi cho bạn thôi nghe!


Xem lại thấy vẫn còn phải sửa thêm chút xíu ở phần cấp giấy chứng nhận. Nên chi .... gởi lại:

 

[lehung090]

Yêu cầu đối với phần mềm thầy vẫn chưa sửa nhất là đối với các loại danh sách: DANH SÁCH HỌC SINH XÉTTỐT NGHIỆP, DANH SÁCH HỌC SINH TỐT NGHIỆP...... vẫn thấy có dòng chữ Đà Lạt, ngày........., tháng.......... năm.......... mà chưa chỉnh sửa được. Vẫn phải làm thủ công.

 

[dvu58]

Yêu cầu đối với phần mềm thầy vẫn chưa sửa nhất là đối với các loại danh sách: DANH SÁCH HỌC SINH XÉTTỐT NGHIỆP, DANH SÁCH HỌC SINH TỐT NGHIỆP...... vẫn thấy có dòng chữ Đà Lạt, ngày........., tháng.......... năm.......... mà chưa chỉnh sửa được. Vẫn phải làm thủ công.

Xin lỗi!
Xin gởi lại bản này, bạn xem thử có được không? (Mình đang bận quá nên cũng không có thời gian xem, kiểm tra và sửa chữa hết. Thôi, nếu còn chỗ nào chưa hoàn chỉnh thì mong bạn tạm thời "xử lý", khi nào có thời gian mình sẽ xem lại cẩn thận)
Bạn lưu ý là về ngày tháng, nhập bằng form ngay từ trang Nhập thông tin ban đầu.

 

[lehung090]

Tôi đã làm được rồi, cám ơn thầy nhiều

 

[phanhuythong]

Nhu the nay thi ong co dung duoc khong?????????????????????

 

[dvu58]

Gởi lại file Xét TNTHCS đã cập nhật

Tôi xin gởi tiếp file Xét TNTHCS đã cập nhật.

Chắc cũng chưa hoàn thiện lắm. Mong các anh chị quan tâm bổ sung, cải tiến.

Trân trọng

 

[dvu58]

Gửi lại phần mềm Xét TNTHCS

Sắp đến kỳ xét tốt nghiệp THCS, tôi xin gửi lại PM Xét TNTHCS đã có điều chỉnh theo link sau:

http://www.mediafire.com/?mextqqansxeljz8

 

[dvu58]

Gửi lại phần mềm xét TNTHCS đã bổ sung thêm

Phần mềm Xét tốt nghiệp THCS theo link cũ đã xóa do:

Theo yêu cầu của CV THCS, tôi bổ sung thêm một số phần vào phần mềm xét TNTHCS:

1. Lập danh sách học sinh tốt nghiệp diện XÉT LẠI.
2. Lập danh sách học sinh tốt nghiệp do hưởng ƯT, KK.
3. Bổ sung thêm phần tổng hợp thống kê xét TNTHCS.
4. Bổ sung thêm chức năng cập nhật danh sách quản lý các file dữ liệu (Các hội đồng gửi file dữ liệu về Phòng GDĐT, Phòng GDĐT nhận file, chép vào thư mục DATA rồi bấm nút Cập nhật danh sách quản lý file)

Anh chị nào quan tâm xin tải theo link sau:
http://www.mediafire.com/?k85zqd63dp1dls8

 

[vo huu tuyen]

Tách , Chuyển sang Danh sách Đ

Nhờ các bạn giùp cho . Mình có file xét TT THCS đính kèm sau ; Trong file muốn tách học sinh "Đ" ở Diện 1 sang danh sách 1 , còn "H" thì không , các bạn làm giúp cho Vậy code thì viết thế nào , hay có các gì hay các bạn giúp

 

[dvu58]

Gửi lại CT Xét TN THCS Tôi gửi lại CT XET TN THCS có chút bổ sung, điều chỉnh.

Link: http://www.mediafire.com/download/x816c107jtlf3xa/SetupXetTNTHCS.exe
Và hướng dẫn sử dụng: http://www.mediafire.com/?kd8ccvwwtbc59r7

 

[kenh20]

Ứng dụng xét tốt nghiệp đạt giải 3 hội thi sáng tạo KHKT toàn quốc lần thứ 13

[TABLE="class: cms_table, width: 515, align: center"]
[TR]
[TD]

Giao diện

​

Ứng dụng được viết trên ngôn ngữ lập trình Visual Basic Application rất gọn nhẹ, dung lượng nhỏ, cài đặt dễ dàng và chạy trực tiếp trên File Excel, có dung lượng nhỏ, dễ cài đặt, dễ sử dụng. Xây dựng ứng dụng gọn nhẹ, có thể chạy trên cấu hình máy tính. Cụ thể:
+ Hệ điều hành Windows XP trở lên.
+ Máy tính có cấu hình cài đặt và chạy được Microsoft Excel 2003 trở lên.Với ứng dụng Xét tốt nghiệp THCS này chỉ cần nhập danh sách theo mẫu sau đó Import vào ứng dụng công việc còn lại thực hiện hoàn toàn tự động và chính xác. Ứng dụng đã giải quyết được cơ bản các yêu cầu về Xét tốt nghiệp THCS một cách hiệu quả.
Ứng dung Xét tốt nghiệp THCS này có các biểu mẫu xét tốt nghiệp, các biểu mẫu thống kê kết quả xét tốt nghiệp chính xác và khoa học.

​

Mẫu phiếu Bảng tên, ghi điểm xét công nhận tốt nghiệp THCS
Tính mới của công trình:
Đây là Ứng dụng xét tốt nghiệp lần đầu tiên được xây dựng cho cả ba cấp: Trường – Phòng GD&ĐT – Sở GD&ĐT. Với đầy đủ các biểu mẫu xét và thống kê xét tốt nghiệp THCS. Ứng dụng là một hệ thống hoàn chỉnh kết nối liên hoàn từ cấp Trường lên cấp Phòng GD&ĐT và lên cấp Sở GD&ĐT.
Đặc biệt Ứng dụng có có phần sắp xếp, định dạng tên đồng bào dân tộc Ê – đê xây dựng riêng cho tỉnh Đăk Lăk nơi có đông đồng bào dân tộc Ê – đê sinh sống.

Khả năng áp dụng:
Ứng dụng có thể áp dụng tại tất cả các trường học, tất cả các phòng GD&ĐT và tất cả các Sở GD&ĐT trong cả nước.
Hiệu quả:
Sử dụng ứng dụng Xét tốt nghiệp này sẽ mang lại hiệu quả kinh tế, tiết kiểm chi phí trong việc:
+ Không mất tiền mua phần mềm xét tốt nghiệp có bản quyền vì ứng dụng xây dựng với mục đích chia sẻ miễn phí.
+ Việc ứng dung có các biểu mẫu xét tốt nghiệp, các biểu mẫu thống kê kết quả xét tốt nghiệp chính xác và khoa học, với quy trình lập dữ liệu trên máy tính hợp lý tránh sai sót dẫn đến tiết kiệm chi phí trong việc in ấn các biểu mẫu, gấy chứng nhận, bằng tốt nghiệp.
+ Góp phần thúc đẩy phát triển ứng dụng công nghệ thông tin trong ngành giáo dục nói riêng và xã hội nói chung.[/TD]
[/TR]
[/TABLE]



Tải về: Bấm vào đây để tải về