Calculer un score en fonction d'une combinaison de chiffres

[pcr]

Bonjour,

Tout d'abord, désolé si mon titre est incompréhensible !

J'ai des qcm à faire corriger sur le modèle suivant :

A B C D E
VRAI X
FAUX X X X X


(A FAUX, B VRAI, C FAUX, D FAUX, E FAUX)

Chaque case bien cochée donne 0,2 point.
Chaque case mal cochée enlève 0,2 point.
En cas de non réponse, on applique 0 point.
On a donc une amplitude de -1 à +1 par question.

Les grilles sont au format papier, et c'est très fastidieux à corriger.
J'ai donc eu l'idée de créer une grille de report des réponses sur excel en remplaçant vrai par 1 et faux par 2.
Sur cette base, on a donc en réponse dans l'exemple ci dessus : 21222

Est-il possible de faire en sorte qu'Excel calcule automatiquement le score par qcm en comparant la réponse saisie à la réponse souhaitée, en ayant à modifier uniquement la réponse souhaitée ?
J'étais parti sur l'idée d'une formule du type "si le premier chiffre est égal au premier chiffre de la réponse souhaité, +0.2, s'il est égal à 0, +0, sinon -0.2 , + si le deuxième chiffre..."

Qu'en pensez-vous ?
Merci !

 

[poulie]

Re : Calculer un score en fonction d'une combinaison de chiffres

Bonjour pcr, Bonjour à tous,

Peut-être cette possibilité =SOMMEPROD((B3:F3=H3:L3)*0,2)

En B3:F3 les réponses (1 ou 2 ou FAUX ou VRAI). En H3:L3 les résultats souhaités

Pas certain d'avoir tout compris. Je pense qu'un fichier, avec ce que tu souhaites, serait plus explicite.

Bonne réception

 

[tdenfert]

Re : Calculer un score en fonction d'une combinaison de chiffres

Bonjour,

Une proposition



edit bonjour Poulie

 

[pcr]

Re : Calculer un score en fonction d'une combinaison de chiffres

Merci pour vos réponses.

Dans l'idéal je préférerai ne pas multiplier les colonnes.
Je suis parvenu à créer une solution, mais j'ai du remplacer le 3 par un 0.

Je ne sais pas s'il y a un moyen d'optimiser ce fichier.

Merci

 

[tdenfert]

Re : Calculer un score en fonction d'une combinaison de chiffres

bonjour,

Je reviens surement trop tard
Une solution avec une fonction perso

Function score(br, rep)
score = 0
For i = 1 To 5

If Mid(br, i, 1) = Mid(rep, i, 1) Then
score = score + 0.2
Else
score = score - 0.2
End If
Next i

End Function