Elle fonctionne en partie mais elle ne départage les "gyms 2 et 3".
Selon les critères le gym 3 devrait être premier (Il a la deuxième note la plus haute) par rapport au  gym 2 qui devrait être deuxième.

C'est exactement ce que tu obtiens avec l'utilisation de la fonction RANG comme précisé dans mon 1er message.

Regarde comment utiliser cette fonction dans l'aide d'Excel. Je te laisse faire cette petite recherche afin que tu apprennes à utiliser cette fonction par toi-même.

A+

Bonjour,

en G2 remplace la formule actuelle par 

=SOMME(C3:F3)+GRANDE.VALEUR(C3:F3;1)/100+GRANDE.VALEUR(C3:F3;2)/1000+GRANDE.VALEUR(C3:F3;3)/10000+GRANDE.VALEUR(C3:F3;4)/100000+0,01/B3

Tu peux ensuite utiliser la fonction RANG pour classer les participants.

A+

Bonsoir,

peut-être que ce fichier placé dans la page des téléchargements répondra à ta demande.

A+

Bonjour,

il y a plusieurs manières de traiter ton sujet.

Ci-joint une possibilité simple que tu devras améliorer, notamment en inscrivant dans la colonne A de la Feuille 2 les mots qui doivent être traités en minuscules.

Sub AdressePostale()
Dim PlMotsMin As Range, PlAdresses As Range
Dim Cel As Range, TabMots As Variant, Adresse
Dim i As Long, j As Long
Set PlMotsMin = Range("mots_min")
Set PlAdresses = Range("adresses")
j = 1
For Each Cel In PlAdresses
  Adresse = Application.WorksheetFunction.Trim(LCase(Cel.Text))
  TabMots = Split(Adresse)
  For i = LBound(TabMots) To UBound(TabMots)
    If Application.WorksheetFunction.CountIf(PlMotsMin, TabMots(i)) = 0 Then _
    TabMots(i) = Application.WorksheetFunction.Proper(TabMots(i))
  Next i
  PlAdresses(j).Offset(, 1) = Join(TabMots, " ")
  j = j + 1
Next Cel
End Sub

A+

Bonjour,

tu précises dans ta réponse que tu as envie de comprendre : cela tombe bien car je préfère t'aiguiller plutôt que de faire à ta place.

Concernant les fonctions utilisées, tu peux aller voir ce tutoriel placé sur le site.

Concernant l'utilisation des TCD, il y a plein d'informations sur le site (tape TCD dans la zone de recherche du site et regarde les différents articles qui en parlent).

Concernant ta question sur les noms de poste je ne l'ai pas comprise.

Etudie les différentes pistes que je t'ai indiquées et n'hésite pas à poser des questions sur ce que tu n'aurais pas compris.

A+

Bonsoir,

Il est préférable d'organiser autrement les listes des chefs et des collaborateurs :

- en A1:C1 la liste des chefs (Bruno Fred et Alain)

- en dessous de chaque chef placer la liste de leurs collaborateur.

- nommer ton onglet Liste

Définir 2 noms :

- Chef =DECALER(Liste!$A$1;;;;NBVAL(Liste!$A$1:$W$1))

- Collaborateur =Liste!$A:$A

Dans la feuille Saisie production créer 2 listes :

- en colonne Equipe  =Chef

- en colonne Collaborateur  =DECALER(Collaborateur;1;EQUIV(A2;Chef;0)-1;NBVAL(DECALER(Collaborateur;;EQUIV(A2;Chef;0)-1))-1)

Proposition adaptée du site http://boisgontierjacques.free.fr/ (voir ici)

A+

Bonsoir,

je ne suis pas sûr de comprendre réellement ton problème mais si c'est le fait que l'action soit effectuée à la sortie du TextBox1 qui te gène tu peux peut-être utiliser l'événement BeforeUpdate à la place de Exit, ce qui fait que ton code sera lancé alors que le curseur est toujours dans le TextBox1.

De plus tu peux également utiliser l'argument Cancel comme avec l'événement Exit.

A+

Bonjour citryk, le forum,

afin de lever toute ambiguïté concernant ta demande il serait préférable de joindre un petit fichier comportant un exemple explicite et le résultat noté manuellement à côté.

Il serait également utile de nous préciser si tu attends une solution à base de formule ou de VBA.

A+

Bonsoir sylcoco, le forum,

je te propose la formule suivante à placer en E1, à valider en matriciel (touches Ctrl, Maj et entrée) et à tirer vers le bas et la droite :

=SI(LIGNE(1:1)<=NB.SI($A$1:$A$6;$D$1);INDEX(B$1:B$6;PETITE.VALEUR(SI($A$1:$A$6=$D$1;LIGNE(B$1:B$6));LIGNE(1:1));LIGNE(B$1:B$6));"")

Si tu as des questions concernant la compréhension de cette formule, n'hésite pas à demander.

A+

Bonsoir sylcoco, le forum,

je te propose la formule suivante à placer en E1, à valider en matriciel (touches Ctrl, Maj et entrée) et à tirer vers le bas et la droite :

=SI(LIGNE(1:1)<=NB.SI($A$1:$A$6;$D$1);INDEX(B$1:B$6;PETITE.VALEUR(SI($A$1:$A$6=$D$1;LIGNE(B$1:B$6));LIGNE(1:1));LIGNE(B$1:B$6));"")

Si tu as des questions concernant la compréhension de cette formule, n'hésite pas à demander.

A+