Dủng hàm gì khi có 4 điều kiện

[thuanduc08]

Tôi đang làm bảng tính thể lực học sinh cấp I nhưng vẫn chưa sử lý được, bài này tôi gửi lên diễn đàn từ tháng 4 nhưng chưa nhận được sự hồi âm nào cả, các bạn xem và cho tôi lời khuyên nhé.

 

[BNTT]

Đây là cái bảng tính bạn gửi lên:

Bạn chịu khó dùng font Unicode dùm cái, thì may ra mới giúp được.

 

[MinhNguyệt]

Tôi đang làm bảng tính thể lực học sinh cấp I nhưng vẫn chưa sử lý được, bài này tôi gửi lên diễn đàn từ tháng 4 nhưng chưa nhận được sự hồi âm nào cả, các bạn xem và cho tôi lời khuyên nhé.

Bạn xem file đính kèm

 

[thuanduc08]

Cảm ơn bạn MinhNguyệt rất nhiều, nhưng vẫn còn một vấn đề nữa là:
- Nếu Nữ: C2=0,1,2,3,->5 vẫn là "Tốt" mà điều này là không thể thì xử lý thế nào vậy bạn?
- Mình muốn kết hợp cả nam và nữ trong cùng một hàm có được không?
- Phần tổng hợp vẫn chưa được bạn ạ.(bạn xem lại giúp mình bảng tổng hợp trong file đính kèm nhé")

 

[SA_DQ]

Còn một vấn đề nữa là:
(1)- Nếu Nữ: C2=0,1,2,3,->5 vẫn là "Tốt" mà điều này là không thể thì xử lý thế nào vậy bạn?
(2) Mình muốn kết hợp cả nam và nữ trong cùng một hàm có được không?
(3) Phần tổng hợp vẫn chưa được bạn ạ.(bạn xem lại giúp mình bảng tổng hợp trong file đính kèm nhé")

Từ dưới lên vậy:

(3) Tại 'J21' bạn thử với công thức này xem sao:
=IF(COUNTIF(C21:I21,"KĐ")>=1,"KĐ",IF(AND(COUNTIF(C21:I21,"T")>2,COUNTIF(C21:I21,"Đ")<2),"T","Đ"))
(Sau đó bạn chép xuống các dòng dưới; Thêm nữa, tại 'H25' bạn thử đổi lại là 'KĐ' xem sao.)

(2)
Mình viết cho bạn hàm đánh giá thể lực của cả các em nam & nữ, như sau:

Option Explicit
Function TheLuc(ThTich As Double, TheLoai As Byte, Optional Nu As Boolean = True) As String
 Dim Chuan1 As Double, Chuan2 As Double
 
 If Nu Then
   Chuan1 = Switch(TheLoai = 1, 7.3, TheLoai = 2, 124, TheLoai = 3, 13.4, TheLoai = 4, 760)
   Chuan2 = Switch(TheLoai = 1, 8.3, TheLoai = 2, 108, TheLoai = 3, 14.4, TheLoai = 4, 640)
 Else
    Chuan1 = Switch(TheLoai = 1, 6.3, TheLoai = 2, 134, TheLoai = 3, 13.2, TheLoai = 4, 770)
   Chuan2 = Switch(TheLoai = 1, 7.3, TheLoai = 2, 116, TheLoai = 3, 14.2, TheLoai = 4, 670)
 End If
 If TheLoai Mod 2 = 1 Then
   If ThTich <= Chuan1 Then
      TheLuc = "Tot"
   ElseIf ThTich <= Chuan2 Then
      TheLuc = "Dat"
   ElseIf ThTich > Chuan2 Then
      TheLuc = "KD"
   End If
 Else
   If ThTich >= Chuan1 Then
      TheLuc = "Tot"
   ElseIf ThTich >= Chuan2 Then
      TheLuc = "Dat"
   ElseIf ThTich < Chuan2 Then
      TheLuc = "KD"
   End If
 End If
End Function

Những chú ý khi sử dụng hàm:
(*) Cú pháp hàm tại 'J4' là =theluc(I4,4)

Tại 'D9' sẽ là: =theluc(C9,1,FALSE)

(*) Vì chưa chắc là bạn ưng xài, nên chưa hoàn thiện; Nếu bạn thích nó thì chúng ta sẽ hoàn chỉnh toàn bộ; Những vấn đề còn tồn:

(1) mà bạn nêu trên: Thành tích =0 có lúc lại là loại tối ưu;
(2) Chưa cho ra loại thể lực bằng chữ cái tiếng Việt


Chờ tin bạn!

 

[thuanduc08]

Tôi đang làm bảng tính thể lực học sinh cấp I nhưng vẫn chưa sử lý được, bài này tôi gửi lên diễn đàn từ tháng 4 nhưng chưa nhận được sự hồi âm nào cả, các bạn xem và cho tôi lời khuyên nhé.

Xin cảm ơn bạn Hyen17 đã giúp tôi nhưng trong cách tính thể lực của học sinh cấp 1 cũng như các cấp đó là thành tích mà học sinh đó đạt được, chẳng hạn hs nam cấp 1 chạy 100m chỉ có thể đạt được ở mức 13'45 là giỏi nhưng nếu ở dưới 8'00 thì không thể được vì vận động viên thế giới còn phải 8'12 mà. Bạn xem lại giúp tôi nhé, xin cảm ơn. Tôi sẽ gửi lại vào mail của bạn. À mà còn vấn đề này nữa tớ chưa biết dùng BVA hay code gì đó nếu có thể bạn chỉ giúp cảm ơn bạn rất nhiều.