Fichier classement

Bonjour Dodo

Je n'ai aucune erreur dans le fichier que tu m'as envoyé
Donnes moi un classement qui provoque une erreur

Cdlmnt
Vai

Bonjour Via,

Un exemple ci-dessous dans les onglets 1 et 6.

Cdlmnt
Dodo

https://www.cjoint.com/c/LGeguqvr7kw

Re,

Je viens de remarquer par hasard que lorsque j'accède au fichier ci dessus , il y a un cadenas dans ces mêmes onglets!
Est ce lié????

Cdlmnt
Dodo

Re,

Je ne sais pas, je n'arrive pas à ouvrir ton fichier, j'ai un message qui m'indique qu'il a un problème !!
Je n'ai pas le cadenas mais il existe sur certaines versions pour indiquer les feuilles verrouillées
Déverrouille donc déjà ces feuilles pour voir si l'erreur subsiste

A tout hasard je te renvoie le fichier d'origine :
https://www.cjoint.com/c/LGelHrKZ5Yu

Cdlmnt
Via

Re,

Je viens d'essayer en enlevant la protection de la feuille 1:idem.
Le pb vient lorsque j'ai 3 journées de résultats.
Je te joins ton fichier avec l'exemple si tu peux l'ouvrir?

https://www.cjoint.com/c/LGemQmFR82w

Cdlmnt
Dodo

Idem
Je ne peux pas l'ouvrir
As-tu changé d'ordinateur, d'emplacement de sauvegarde ??
Le problème semble venir de chez toi

Re,
Je suis passé à Windows 10 depuis 2mois environ.
Je pense que le pb vient d'ici car auparavant tout allait bien.
Je vais regarder avec un autre ordinateur.
Merci.
Cdlmnt

Dodo

Oui tub n'es pas le seul à avoir des soucis avec Windows10
Tiens moi au courant

Cdlmnt
Via

Bonsoir Via,

Après quelques investigations..

Avec Windows 7,10,11: même pb, pas pu essayer avec Windows 8.

Dans mes simulations je remplissais les résultats sur les 7 journées en une seule fois et jamais de pb quelque soient les données rentrées!
Aujourd'hui encore c'est bon.

Le bug:
Si je rentre la 1ère journée seule avec comme exemples:
18/24/12/20 pas ok.
18/18/18/18:ok
18/18/20/20:ok
18/18/18/20:ok

Erreur13:Traitement tripions et qua tripions: Range("G""et ligne A,etc...)

Peux tu, stp, simuler avec ton fichier les valeurs ci dessus?

Merci.

Cdlmnt

Dodo

Bonjour Via,

As tu eu le temps de simuler les exemples ci dessus?

Merci

Cdlmnt

Dodo

Bonjour Dodo

Désolé je n'avais pas vu ton message

Je viens de simuler, j'obtiens le même erreur que toi dans ce cas précis, je n'arrive pas à voir pourquoi

J'ai contourné le problème en mettant une gestion d’erreur dans la macro

https://www.cjoint.com/c/LGllhN0o18u

En espérant que les classements seront bons dans tous les cas

Cdlmnt

Via

---

Bonjour Via,

A priori c'est bon d'après les essais que j'ai réalisés!

Je viens de découvrir un autre pb qui n'a rien à voir avec ce que tu as fait.

Quand une feuille est protégée, même si je coche format de cellule autorisée, elle se décoche lorsque je lance la macro sur cette même feuille pour avoir le résultat?

Merci

Cdlmnt

Dodo

Normal l'option n'était pas prévu dans la macro

Dans module 1 à la fin de la macro classement remplace le

ActiveSheet.Protect  ""

par ActiveSheet.Protect AllowFormattingCells:=True
Cdlmnt

Via

---

Bonsoir Via,

Nickel!

Tout fonctionne.

Je te tiens au courant si pb nouveau?????

Encore un grand merci

Cdlmnt

Dodo

Bonjour Via,

Je viens de m'apercevoir que lorsque je modifie le format d'une cellule dans une feuille protégée, avec la modif que tu m'as recommandée, c'est ok , la feuille se protège mais si je clique sur ôter la protection, celle ci s'enlève sans me demander mon mot de passe!

Donc ma feuille n'est plus protégée !

Y a t'il une autre possibilité?

J'en doute...

Merci de ton retour.

Cdlmnt

Dodo

Bonsoir Dodo

Oui en fin de macro la protection se fait pour l'instant sans mdp

Il faut indiquer ton mdp entre les guilemets

par exemple

ActiveSheet.Protect  "dodo"

Cdlmnt

Via

---

Re,

Je me suis mal exprimé dans ma requête:

Je souhaite qu'un autre utilisateur que moi puisse changer le format des cellules verrouillées

(par exemple changer la couleur de fond d'une cellule  sans lui donner mon MDP.

Actuellement, si la personne clique sur ôter la protection, elle s'enlève sans lui demander le MDP, il a donc accès à toutes les cellules puisque la feuille n'est pas protégée tant qu'il ne clique pas sur le bouton classement.

Je ne suis pas sûr d'être encore très clair?

Cdlmnt

Dodo

Re,

Il faut bien sûr protéger avant la feuille en cochant  Sélectionner les cellules déverrouillées et Format de cellule et en entrant ton mot de passe

Ensuite en début de la macro Classement tu dois avoir l'instruction

ActiveSheet.Unprotect "ton mot de passe "  pour que la macro puisse déprotéger la feuille

et en fin de la macro l'instruction

 ActiveSheet.Protect Password:="Ton mot de passe", AllowFormattingCells:=True pour la reprotection

Cdlmnt

Via

---

Bonjour Via,

Je suis toujours aussi lourd!!

C'est bon, aucun pb.

Merci

Cdlmnt

Dodo

Bonjour Via,

Me revoilà!

Est-il possible d'avoir en colonne "T" le même classement qu'en colonne "AE"?

Le fichier étant en doublette l'équipe 3ème est en fait 2ème, etc...

Merci de ton retour.

Cdlmnt

Dodo

https://www.cjoint.com/c/LHpiurnOPCV