Показать сообщение отдельно
Старый 05.07.2008, 12:31     # 503
Vellion
Junior Member
 
Регистрация: 16.04.2004
Сообщения: 53

Vellion Известность не заставит себя ждать
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
В качестве параметра передавать массив из чего среднее считать, а выдает сразу строку "Бронза", "Серебро" или "Золото"

Последний раз редактировалось Vellion; 05.07.2008 в 21:09.
Vellion вне форума