Giúp em sắp xếp dữ liệu.

[stbk2006]

Chào các bác, em đã đăng kí thành viên ở diễn đàn này lâu rồi, nay có vấn đề khúc mắc tham khảo ý kiến các bác.

Chả là chỗ em đang tổ chức giải bóng đá. Em đang làm cái bảng tính, xếp hạng các đội.
Về phần điểm số, số trận, tính điểm, hiệu số... em làm được rồi nhưng mà chưa biết cách nào để dữ liệu tự động nhảy trên bảng xếp hạng.
Ví dụ như có 4 đội A, B, C, D, đội B được 9 điểm chẳng hạn thì tự động sắp xếp đội B lên đầu danh sách.
Hoặc 2 đội bằng điểm nhau thì tính xem đội nào hiệu số bàn thắng thua lớn hơn sẽ đứng lên trên.

Mong các bác chỉ giáo.

 

[nghiaphuc]

Chào các bác, em đã đăng kí thành viên ở diễn đàn này lâu rồi, nay có vấn đề khúc mắc tham khảo ý kiến các bác.
Chả là chỗ em đang tổ chức giải bóng đá. Em đang làm cái bảng tính, xếp hạng các đội.

Về phần điểm số, số trận, tính điểm, hiệu số... em làm được rồi nhưng mà chưa biết cách nào để dữ liệu tự động nhảy trên bảng xếp hạng.

Ví dụ như có 4 đội A, B, C, D, đội B được 9 điểm chẳng hạn thì tự động sắp xếp đội B lên đầu danh sách.
Hoặc 2 đội bằng điểm nhau thì tính xem đội nào hiệu số bàn thắng thua lớn hơn sẽ đứng lên trên.​

Mong các bác chỉ giáo.​

Bạn sử dụng code như sau cho sheet chứa dữ liệu. Giả sử dữ liệu của bạn nằm trong vùng A1:C5 như dưới bảng này:​

|A|B|C
1|Đội|Điểm|Hiệu số Thắng-Thua
2|A||
3|B||
4|C||
5|D||

Private Sub Worksheet_Change(ByVal Target As Range)
    If Intersect(Target, [B2:C5]) Is Nothing Then Exit Sub
    [A1:C5].Sort Key1:=[B2], Order1:=xlDescending, Key2:=[C2], Order2:=xlDescending, Header:=xlYes
End Sub

Bạn xem trong file đính kèm nhé.​

 

[stbk2006]

Cám ơn bác, em sẽ test thử xem thế nào.