Discussion :

[pilounet54]

je souhaite dans un colonne je mets des zéro dans une cellule et le chiffre un dans une autre cellule à chaque fois qu' il rencontre le chiffre 1 le compteur se remet à zéro et depuis le dernier chiffre un il compte qu’après combien il y a de zéro
en espérant avoir été assez clair

exemple: dans une colonne j'ai première cellule 0, deuxième cellule 1, cellule trois 0 ,cellule quatre 0 le compteur devra m'afficher 2
merci d'avance

[electrons]

Bonjour,

Je suggère de passer par du code VBA

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
Sub CompteurZero()
Dim i as Integer
Dim Compteur as Integer
 
i = 1
Compteur = 0
 
Do While Range("A" & i).Value <> ""
 
 IF Range("A" & i).Value = 0 Then
       Compteur = Compteur + 1
   Else
       Compteur = 0
 End if
 
 i = i + 1
Loop
 
'Copie de la valeur Compteur dans la cellule B1
Range("B1").Value = Compteur
 
End Sub

Bien à vous

Electrons

[pilounet54]

bonjour
et merci de proposer quelque chose, mais cela ne fonctionne pas
cordialement

[electrons]

Bonjour,

Désolé de répondre seulement maintenant.
Je viens d'exécuter la macro avec dans les cellules de la colonne "A" des 1 et des 0, il m'additionne bien la dernière série de 0 rencontrée après le dernier 1 de la colonne, Il m'affiche bien dans la cellule "B1" le résultat; c'est ce que vous demandiez!!! Ou alors, votre requête a été mal comprise.
Expliquez-vous de manière plus précise pour que je puisse vous aider.

Cordialement.

[pilounet54]

bonjour
tu as bien compris le problème et je t'en remercie mais je n'ai pas le même résultat fichier joint yves4

soit le compteur n’arrête pas de compter ou il est a l’arrêt comme tu pourra le voir
merci à l'avance

[electrons]

Bonjour,

C'est normal que la macro donne une valeur 0 en "B1" car dans la fichier les cellules "A1" et "A2" sont vides, la première ligne remplie est en "A3", il faut donc remplacer le code "i = 1" par "i = 3" qui est la première ligne lue de la colonne "A".

J'espère que ça ira mieux...

Bonne fin de journée.