Đánh giá chủ đề:
  • 0 Votes - 0 Average
  • 1
  • 2
  • 3
  • 4
  • 5
[Help] sắp xếp thứ hạng trong access!
08-09-12, 08:59 PM (Được chỉnh sửa: 09-09-12 12:43 PM bởi hjhjngon.)
Bài viết: #1
sắp xếp thứ hạng trong access!
các bạn chỉ mình cách sắp xếp thứ hạng theo điểm trong access với, dùng lệnh trong query để sắp xếp ở table

xếp thứ hạng theo điểm chứ k phải là xếp theo thứ tự đâu nhé, xếp như rank trong excel nhưng mà không nhảy cóc thứ hạng khi có nhiều điểm bằng nhau thì càng tốt

bài làm của mình đây: http://www.mediafire.com/download.php?vq0hrsn879f9j8t

Chữ Ký của hjhjngonXin chào, mình là hjhjngon, Tham gia http://thuthuataccess.com/forum từ ngày 08-09 -12.
Trả lời
09-09-12, 11:45 AM
Bài viết: #2
RE: sắp xếp thứ hạng trong access!
Bạn post file lên mọi người giúp cho bởi vì không hiểu ý bạn lắm.

Chữ Ký của cpucloiTôi chỉ biết mỗi một điều là những điều tôi biết được còn quá ít 021
Gmail: cpucloi@gmail.com
Yahoo: cpucloi@yahoo.com.vn
Skype: cpucloi
Facebook: cpucloi
Two: cpucloi
ღღღღღTài sản của cpucloi (View All Items) ღღღღღ
Trả lời
09-09-12, 12:45 PM
Bài viết: #3
RE: sắp xếp thứ hạng trong access!
đã thêm file nhé bạn

ý mình làm xếp thứ hạng VD: điểm cao nhất thì hạng 1, điểm cao thứ 2 thì đứng hạng 2, nếu có 2 người đồng hạng thì người sau sẽ là hạng 3, hoặc là hạng 4 nếu bị nhảy cách

Chữ Ký của hjhjngonXin chào, mình là hjhjngon, Tham gia http://thuthuataccess.com/forum từ ngày 08-09 -12.
Trả lời
10-09-12, 09:16 PM
Bài viết: #4
RE: sắp xếp thứ hạng trong access!
(09-09-12 12:45 PM)hjhjngon Đã viết:  đã thêm file nhé bạn

ý mình làm xếp thứ hạng VD: điểm cao nhất thì hạng 1, điểm cao thứ 2 thì đứng hạng 2, nếu có 2 người đồng hạng thì người sau sẽ là hạng 3, hoặc là hạng 4 nếu bị nhảy cách

Cái này ít có giá trị sử dụng lắm bạn ơi!

Chữ Ký của NguyendinhthanhMy site: Tài liệu
ღღღღღTài sản của Nguyendinhthanh (View All Items) ღღღღღ
Trả lời
10-09-12, 09:24 PM
Bài viết: #5
RE: sắp xếp thứ hạng trong access!
nhưng mà bài tập của mình nó như thế, mình k biết nên mới post lên đây mà, giúp mình với

Chữ Ký của hjhjngonXin chào, mình là hjhjngon, Tham gia http://thuthuataccess.com/forum từ ngày 08-09 -12.
Trả lời
11-09-12, 09:14 AM (Được chỉnh sửa: 11-09-12 09:18 AM bởi Xuân Thanh.)
Bài viết: #6
RE: sắp xếp thứ hạng trong access!
(08-09-12 08:59 PM)hjhjngon Đã viết:  các bạn chỉ mình cách sắp xếp thứ hạng theo điểm trong access với, dùng lệnh trong query để sắp xếp ở table

xếp thứ hạng theo điểm chứ k phải là xếp theo thứ tự đâu nhé, xếp như rank trong excel nhưng mà không nhảy cóc thứ hạng khi có nhiều điểm bằng nhau thì càng tốt

bài làm của mình đây: http://www.mediafire.com/download.php?vq0hrsn879f9j8t

1/ Đúng là việc này ít sử dụng
2/ Nếu muốn làm thì làm thủ công thế này
2.1/ Tạo query từ table HoSo, chọn Acending cho trường HoTen, Decending cho truong Tong
2.2/ Chạy query trên và gõ số thứ tự từ 1 đến hết cho trường XepThu (Trong bài Demo của bạn là từ 1 - 10)
2.3/ Chuyển query trên thành query Update, Update To [XepThu]
2.4/ Run query Update vừa làm ở trên, bạn sẽ có kết quả như mong muốn

Nếu muốn nhanh và chính xác thì dùng VBA
Lưu ý : Với cách dùng query như trên, trình tự ưu tiên sẽ là Tong, nếu Tong bằng nhau thì ai có HoTen xếp trước theo vần ABC sẽ có thứ hạng đứng trước
Xem file đính kèm


File đính kèm
.zip  12SN.zip (Kích cỡ: 20.55 KB / Tải về: 42)

Chữ Ký của Xuân ThanhTrăm năm trước thì ta chưa gặp
Trăm năm sau biết gặp được không?
Cuộc đời sắc sắc không không
Thì thôi ta cứ hết lòng vì nhau
ღღღღღTài sản của Xuân Thanh (View All Items) ღღღღღ
Trả lời
11-09-12, 10:31 AM
Bài viết: #7
RE: sắp xếp thứ hạng trong access!
(11-09-12 09:14 AM)Xuân Thanh Đã viết:  
(08-09-12 08:59 PM)hjhjngon Đã viết:  các bạn chỉ mình cách sắp xếp thứ hạng theo điểm trong access với, dùng lệnh trong query để sắp xếp ở table

xếp thứ hạng theo điểm chứ k phải là xếp theo thứ tự đâu nhé, xếp như rank trong excel nhưng mà không nhảy cóc thứ hạng khi có nhiều điểm bằng nhau thì càng tốt

bài làm của mình đây: http://www.mediafire.com/download.php?vq0hrsn879f9j8t

1/ Đúng là việc này ít sử dụng
2/ Nếu muốn làm thì làm thủ công thế này
2.1/ Tạo query từ table HoSo, chọn Acending cho trường HoTen, Decending cho truong Tong
2.2/ Chạy query trên và gõ số thứ tự từ 1 đến hết cho trường XepThu (Trong bài Demo của bạn là từ 1 - 10)
2.3/ Chuyển query trên thành query Update, Update To [XepThu]
2.4/ Run query Update vừa làm ở trên, bạn sẽ có kết quả như mong muốn

Nếu muốn nhanh và chính xác thì dùng VBA
Lưu ý : Với cách dùng query như trên, trình tự ưu tiên sẽ là Tong, nếu Tong bằng nhau thì ai có HoTen xếp trước theo vần ABC sẽ có thứ hạng đứng trước
Xem file đính kèm
Vậy bạn viết dùm code VBA xếp hạng luôn đi, xin cám ơn

Chữ Ký của tracanhtamHãy chia sẻ kinh nghiệm cùng mình trên ThuThuatAccess nhé! Chúc vui vẻ rose
Trả lời
11-09-12, 12:10 PM
Bài viết: #8
RE: sắp xếp thứ hạng trong access!
bạn code lun VBA rùi chỉ mình cách dùng lun với

Chữ Ký của hjhjngonXin chào, mình là hjhjngon, Tham gia http://thuthuataccess.com/forum từ ngày 08-09 -12.
Trả lời
11-09-12, 02:30 PM
Bài viết: #9
RE: sắp xếp thứ hạng trong access!
(11-09-12 12:10 PM)hjhjngon Đã viết:  bạn code lun VBA rùi chỉ mình cách dùng lun với

1/ Tạo một table XepHangHocSinh có cấu trúc giống hệt table HoSo nhưng không cập nhật di74 liệu
2/ Tạo một query qryXepHang như sau ;

Mã:
SELECT HoSo.STT, HoSo.HoTen, HoSo.NgaySinh, HoSo.NoiSinh, HoSo.Toan, HoSo.Van, HoSo.Anh, HoSo.Tong, HoSo.XepLoai
FROM HoSo
ORDER BY HoSo.Tong DESC , HoSo.HoTen;
3/ Tạo một modul mới rồi chép hai hàm sau vào modul

Mã:
Option Compare Database
Option Explicit

Function XoaTable(TabName As String)
    Dim CauSQL As String
    CauSQL = "DELETE * FROM " & TabName
    DoCmd.SetWarnings False
    DoCmd.RunSQL CauSQL
    DoCmd.SetWarnings True
End Function

Function XepHang()
    Dim HS As Recordset
    Dim XH As Recordset
    Dim QX As QueryDef
    Dim i As Integer, k As Integer
    Set QX = CurrentDb.QueryDefs("qryXepHang")
    Set HS = QX.OpenRecordset()
    Set XH = CurrentDb.OpenRecordset("XepHangHocSinh", dbOpenTable)
    If XH.RecordCount > 0 Then Call XoaTable("XepHangHocSinh")
    HS.MoveFirst
    For i = 1 To HS.RecordCount
        XH.AddNew
        For k = 0 To HS.Fields.Count - 1
            XH.Fields(k) = HS.Fields(k)
        Next
        XH!XepThu = i
        XH.Update
        HS.MoveNext
    Next
    XH.Close: HS.Close
End Function

4/ Chạy hàm XepHang bằng một nút bấm hoặc gì gì đó tùy bạn

Lưu ý : Khi chạy hàm XepHang, đầu tiên nó sẽ xóa toàn bộ table XepHangHocSinh, sau đó nhặt từng record của table HoSo vào và xếp hạng học sinh như tôi đã nói ở trên. Vì thế bạn cứ thoải mái cập nhật cho table HoSo mà không phải bận tâm tới Table XepHangHocSinh
Thân mến

Chữ Ký của Xuân ThanhTrăm năm trước thì ta chưa gặp
Trăm năm sau biết gặp được không?
Cuộc đời sắc sắc không không
Thì thôi ta cứ hết lòng vì nhau
ღღღღღTài sản của Xuân Thanh (View All Items) ღღღღღ
Trả lời
13-06-14, 12:49 PM
Bài viết: #10
RE: sắp xếp thứ hạng trong access!
bạn Xuân Thanh có file demo không bạn?

Chữ Ký của ndthanh29Xin chào, mình là ndthanh29, Tham gia http://thuthuataccess.com/forum từ ngày 08-10 -12.
Trả lời

Tags: sắp, xếp, thứ, hạng, trong, access,

Có thể liên quan đến chủ đề
Chủ đề: Tác giả Trả lời: Xem: Bài mới nhất
  tự động điền dự liệu vào khi chọn 1 combobox trong form nghancntt 2 117 Hôm nay 11:03 AM
Bài mới nhất: nghancntt
  Lọc trong access (cần giúp) svhsph 9 298 Hôm qua 07:37 AM
Bài mới nhất: svhsph
  [Help] Xin hướng dẫn xóa record có điều kiện trong table morosumo 1 52 12-09-14 07:57 AM
Bài mới nhất: cpucloi
  [Help] Update cột Primary Key trong 2 bảng quan hệ 1-1 minbk 1 71 24-08-14 12:33 PM
Bài mới nhất: minbk
  [Help] Lập bảng chi tiết trong bảng chính minbk 3 99 21-08-14 06:53 AM
Bài mới nhất: hanyoungmine

Chuyển nhanh:


Thành viên đang đọc chủ đề: 1 Khách

Liên hệ | Thủ Thuật Access | Lên trên | Nội dung | Bản rút gọn | Tin RSS