Gestion des cartons jaunes et cartons rouges championnat de foot amateur

[Grecal]

Bonjour, je viens trouver de l'aider pour réaliser une formule pouvant gérer les cartons jaunes et rouges.
C'est à dire :
- Le règlement indique que si on reçoit 3 cartons jaunes en moins de 3 mois on est suspendu 1 match, si dans les trois mois il y'a 8 ou 9 matchs il y'a donc possibilité d' être suspendu 1 à 3 fois dans l'intervalle de temps compris entre la date du premier carton et le jour ou cela fera 3 mois après la prise du premier carton.
J'aimerais savoir si c'est possible de crée une formule pouvant gérer et faire apparaître par exemple sur une deuxième feuille s'ils sont suspendu ou non.

Je pense que c'est très dur est je suis dans l'incapacité d'y arriver.

Si un de vous y arrives je lui serais énormément reconnaissant.

Merci a+

 

[mapomme]

Re : Gestion des cartons jaunes et cartons rouges championnat de foot amateur

Bonjour Grecal et bienvenue sur XLD,

Un essai sans aucune prétention.

Comme je n'y connais pas grand chose en football , j'ai fait quelques hypothèses:

• Si le prochain match est à la date du 20-juillet-2014, alors on examine les match entre la date du 21-avril-2014 et la date du 19-juillet-2014 pour le comptage des cartons jaunes.
• A chaque suspension d'un joueur, le compteur des cartons jaunes du joueur est remis à zéro.
• Les données à saisir dans le tableau, pour le dernier match joué et pour chaque joueur, sont le nombre de cartons jaunes reçus. Si le joueur n'a pas reçu de carton jaune, alors on ne saisit rien (ou 0).

Comment ça marche ?:

• Pour le prochain match à jouer, la macro met un X dans la cellule du joueur s'il sera suspendu sinon efface la cellule.
• Une MFC colore les cellule comprenant un X en rouge.
• Une MFC colore les cellule avec carton jaune en jaune.
• Une MFC colore la date et le match du prochain match en vert vif
• Une MFC colore la date et le match des match compris dans les 3 mois en vert clair
• Un nom au niveau classeur a été créé "DateLimite3mois". Sa valeur est attribuée par la macro.
• Des messages d’avertissement sont affichés si le prochain match est à la date d'aujourd'hui (remplacer la date du 20/07/2014 par la date d'aujourd'hui)

Edit : Préférez le fichier v1.a du message suivant #3

 

[mapomme]

Re : Gestion des cartons jaunes et cartons rouges championnat de foot amateur

Bonjour à tous,

Préférez cette version v1.a qui évite des plantages sur la date limite à 3 mois passés.

Edit : Bonjour job75

 

[job75]

Re : Gestion des cartons jaunes et cartons rouges championnat de foot amateur

Bonjour Grecal, salut mapomme,

Gestion des cartons jaunes par une MFC utilisant cette fonction VBA :

Function Suspendu(r As Range) As Boolean
Dim t$, dat As Range, derdat As Date, i%, n As Byte
t = "cj" 'texte à tester (carton jaune)
Set dat = [C1].Resize(, r.Count) 'ligne des dates, à adapter
If LCase(r(r.Count - 1)) <> t Then Exit Function
derdat = dat(r.Count - 1)
For i = r.Count - 1 To 1 Step -1
  If LCase(r(i)) = t Then n = n + 1
    If n = 3 Then If derdat < DateAdd("m", 3, dat(i)) _
      Then Suspendu = True: Exit Function
Next
End Function

Fichier joint.

A+

 

[job75]

Re : Gestion des cartons jaunes et cartons rouges championnat de foot amateur

Re,

Une autre solution, toujours avec une MFC, mais sans VBA.

A+

 

[Grecal]

Re : Gestion des cartons jaunes et cartons rouges championnat de foot amateur

Merci les différentes solutions apportés sont parfaites, je ne vous remercierais jamais assez donc mille merci plus un dernier merci ça mange pas de pain !!

A+

 

[job75]

Re : Gestion des cartons jaunes et cartons rouges championnat de foot amateur

Bonjour Grecal, mapomme, le forum,

Dans les fichier joints le comptage est remis à zéro après une suspension.

Il suffit d'inscrire un "S" le jour de la suspension.

De cette manière, pour chaque joueur, il n'y aura qu'une seule cellule colorée par la MFC.

A+

 

[Grecal]

Re : Gestion des cartons jaunes et cartons rouges championnat de foot amateur

Bonjour a tous suite à votre aide ultra utile je viens encore vous demander un dernier service.

Suite au petit logiciel que vous m'avez fait et suite au dernière info que j'ai eu sur le mode de fonctionnement des suspensions pour les cartons jaunes, il apparaît qu' après avoir pris 3 cartons jaunes en moins de 3 mois de temps la suspension n'est pas automatiquement applicable au match suivant mais le match d'après.

Voila je vous joins le dernier fichier que vous m'avez envoyé pour que vous m'aidiez a y voir plus clair.

Merci d'avance ^^

 

[job75]

Re : Gestion des cartons jaunes et cartons rouges championnat de foot amateur

Bonjour Grecal, le fil,

Fichier joint, a priori il suffisait dans les formules de remplacer B3 par A3 et B$1 par A$1.

A+