Condition multiple

Bonjour tout le monde,

J'ai un petit problème, j'ai plusieurs phases (allant de 1 à 5) qui sont notées, chaque phase doit être supérieure à 10, et la moyenne des phases 1 à 4 additionné à la phase 5 divisé par 2, doit être supérieur à 12.

J'ai donc voulu mettre en place un " =si(et( " mais impossible de le faire fonctionné car si j'essaye de mettre en place toutes les combinaisons possible, il y a trop de condition. Comment puis-je faire ?

Voici un exemple de ce que je voudrais obtenir a la fin.

Espérons que je sois assez clair xD et merci !

Bonjour,

voir si cela te conviendrait ?

@ + +

Bonjour,

Niquel c'est exactement ca! Merci

Bonjour,

Autre proposition, fonction personnalisée :

Function EVALSCORE(résult As Range) As String
    Dim éval$, i%, n
    Application.Volatile
    If résult.Cells.Count <> 5 Then
        EVALSCORE = CVErr(xlErrRef)
        Exit Function
    End If
    With résult
        For i = 1 To 4
            n = n + .Cells(i).Value
            If .Cells(i).Value < 10 Then éval = éval & " phase " & i & ","
        Next i
        If éval <> "" Then
            éval = Left(éval, Len(éval) - 1)
            éval = ", sauf" & éval
        End If
        n = (n / 4 + .Cells(5).Value) / 2
        If n < 12 Then
            éval = "Ensemble non validé"
        Else
            éval = "Ensemble validé" & éval
        End If
    End With
    EVALSCORE = éval
End Function

à utiliser comme une fonction intégrée.

Cordialement