Feuille gestion d'équipe

Bonjour,

Je suis en train de créer un doc de gestion pour une équipe de foot.

J'en suis à l'étape de gestion des résultats.

Pour cette étape, j'ai géré cela comme suit :

3 cellules : Victoires / Défaites / Nuls

Elles sont liées à 16 matchs pour lesquels je peux ajouter le résultats de l'équipe A contre l'équipe B.

J'arrive en a faire, faire le calcul pour les Victoires et les Défaites en fonction du résultat, mais pour le match nul ...

Actuellement j'en suis à cela

SI(W32=W33;1;0)

Mais du coup, si ma cellule est vide alors l'équipe reçoit 1 point ... auriez vous une idée ?

Ma feuille de gestion fait 15 pages, et c'est plus ou moins le dernier point sur lequel je coince ...

Merci d'avance.

Bonjour,

Tu peux nous rejoindre un fichier exemple stp ?

Et donc la ligne N = 16 c'est la formule que j'ai indiquée au dessus.

SI(W32=W33;1;0)

J'aimerais que tant que la cellule soit vide, le tableur ne donne pas de point.

Bonjour

Ouvre Vba Alt+F11

colle ceci dans un module, tu auras une fonction personnalisé:

Function CL(Match, Adversaire)
'Classement match 1 contre adversaire 1 etc... point victoire, nul, défaite...

If Match = "" And Adversaire = "" Then
    CL = 0
Else
    If Match > Adversaire Then              '4 * (Match > Adversaire)
        CL = Range("=ACCUEIL!D7").Value     'cellule ou l'on met les points pour victoire  ou CL = 4
    ElseIf Match = Adversaire Then          '2 * (Match = Adversaire)
        CL = Range("=ACCUEIL!D8").Value     'cellule ou l'on met les points pour nul  ou CL = 2
    ElseIf Match < Adversaire Then          '1 * (Match < Adversaire))
        CL = Range("=ACCUEIL!D9").Value     'cellule ou l'on met les points pour défaite  ou CL = 1
    End If
    End If
    'code facultatif
 If Match = "-1" Then                       'Pour l'équipe gagnant par forfait
        CL = Range("=ACCUEIL!D7").Value     'cellule ou l'on met les points pour victoire  ou CL = 4
         ElseIf Match = "-4" Then           'Pour l'équipe perdante par forfait
        CL = Range("=ACCUEIL!D10").Value    'cellule ou l'on met les points pour forfait  ou CL = 0
        End If
    'reprise de code
End Function

Dans la barre de formule tu n'as plus qu'à retranscrire

CL(Cellule score1;Cellule score2)

Sinon regarde ici https://forum.excel-pratique.com/viewtopic.php?f=3&t=70817

Ouille !!

Je ne m'attendais pas à quelque chose d'aussi complexe !

Bonjour,

petit joueur va...

Bon, alors en plus simple :

=SI(NB(W32;W33)=2;SI(W32=W33;1;0);"")

eric

Bonjour,

rassures toi, il y a beaucoup de commentaire dans le code.

L'avantage est que tu pourras changer les points attribués à ta convenance, sans reprendre chacune des formules.

Exemple: tu décides que le nul vaut "1" point au lieu de "2", tu modifies soit le code, soit la cellule de référence.

Merci !

La complexité est que c'est pour la gestion quotidienne d'une équipe !

Et donc je ne regarde pas les autres.