XL 2019 Incrémentation et remise à zéro

Phil69970

XLDnaute Barbatruc

• 14 Avril 2022

• #2

Bonjour @Ennawe

Je te propose ce fichier
Tout se (re)calcul lors d'un changement sur la colonne E ou N

Si cela ne convient pas un fichier s'impose

*Merci de ton retour

@Phil69970

 

Pièces jointes

• Compteur si condition V1.xlsm

  37.8 KB · Affichages: 3

Vote positif 0 Vote négatif

E

Ennawe

XLDnaute Nouveau

• 15 Avril 2022

• #3

Super Phil69970, ce que tu propose m'avance beaucoup !

La seule différence avec mon besoin, pour reprendre ton exemple, c'est qu'il faudrait que le compteur soit lié à chaque valeur de texte différente (un compteur pour blabla1, un pour blabla2, etc...), je t'ai mis un exemple dans le fichier que tu m'as envoyé.

Merci pour ta réponse !

 

Pièces jointes

• Compteur si condition V1.xlsm

  38.2 KB · Affichages: 4

Vote positif 0 Vote négatif

Phil69970

XLDnaute Barbatruc

• 15 Avril 2022

• #4

Bonjour @Ennawe

Tu tri par la colonne E et cela fonctionne comme tu le souhaites

*Merci de ton retour

@Phil69970

 

Vote positif 0 Vote négatif

E

Ennawe

XLDnaute Nouveau

• 15 Avril 2022

• #5

Effectivement, mais dans mon application j'aimerais que cela fonctionne sans avoir besoin de trier par E car mon tableau original doit être lisible sans tri.

Merci pour ta réponse.

 

Vote positif 0 Vote négatif

Phil69970

XLDnaute Barbatruc

• 16 Avril 2022

• #6

Re

Un essai

*Merci de ton retour

@Phil69970

 

Pièces jointes

• Compteur si condition V2.xlsm

  21.2 KB · Affichages: 4

Vote positif 0 Vote négatif

Solution

E

Ennawe

XLDnaute Nouveau

• 19 Avril 2022

• #7

Merci Phil69970, c'est presque ça ! Tout fonctionne parfaitement, le seul problème est quand le texte n'apparaît qu'une seule fois.

Il faudrait modifier cette ligne : If Range("E" & i) <> "" And Range("N" & i) = "OUI" And Range("E" & i) = Range("E" & i + 1) Then

Je vais essayer, je reviens vers toi si je trouve une solution pour clôturer ma demande !

Eddit : J'ai trouvé la solution il suffit de rajouter une ligne ElseIf Range("E" & i) <> "" And Range("N" & i) = "OUI"

 

Dernière édition: 19 Avril 2022

Vote positif 0 Vote négatif