to Judge
Либо вот так: G1 ячейка в которой среднее округленное значение находиться, оно нормально и так считается
Код:
=ЕСЛИ(G1<5;"ХЗ";ЕСЛИ(G1<=8;"Бронза";ЕСЛИ(G1<10;"ХЗ";ЕСЛИ(G1<=12;"Серебро";ЕСЛИ(G1<=15;"Золото";"ХЗ")))))
Либо функцию писать типа такой:
Код:
Public Function Test(A) As String
If A >= 5 And A <= 8 Then
Test = "Бронза"
Else
If A >= 10 And A <= 12 Then
Test = "Серебро"
Else
If A >= 13 And A <= 15 Then
Test = "Золото"
Else
Test = "ХЗ"
End If
End If
End If
End Function
P.S. Только в файлике почему то числа в я чейках f3, g3, h3 и так далее, строками себя считают.
Как вариант если промежуточные значения не нужны такое использовать:
Код:
Public Function Test(M) As String
i = 0
s = 0
For Each k In M
s = s + k
i = i + 1
Next k
A = s \ i
If (s Mod i) * 2 >= i Then
A = A + 1
End If
If A >= 5 And A <= 8 Then
Test = "Бронза"
Else
If A >= 10 And A <= 12 Then
Test = "Серебро"
Else
If A >= 13 And A <= 15 Then
Test = "Золото"
Else
Test = "ХЗ"
End If
End If
End If
End Function
В качестве параметра передавать массив из чего среднее считать, а выдает сразу строку "Бронза", "Серебро" или "Золото"