VBA pour calculer d'une somme particulier

Bonjour,


Je voudrais calculer la somme des valeurs différentes de zéro qui se trouve dans une seul colonne et affiche la somme trouvé
après les calcule des valeur trouvé , si il ya un zéro en dessous des valeur
la fonction réinitialise et continu de chercher des valeur " différentes de zéro " en dessous
( si il trouve des valeurs elle fais la somme des valeurs trouvé et affiche les valeurs , si il ya un zéro en dessous des valeur la fonction réinitialise et continu de chercher des valeur " différentes de zéro " en dessous encoure une fois , )
la fonction arrête si il ya pas des nombre


( jai ponce a cette fonction
n= linge de colone
si ( n = 0 , ( voire n+1 ) ,sino ( somme ( n+(n+1)) jusque( n+1=0) avec la réinitialisation et l'affichage de la somme )
après continu la vérification de n+1


voilà un exemple :
la colonne concerné " aria "
Pièce jointe 460733
Pièce jointe 460729

voila le ficher xlsx

Bonjour,

Pas besoin de VBA, ajout d'une colonne supplémentaire(en L) pour faire des calculs intermédiaires avec la formule suivante en L2 et à tirer vers le bas:

Code:

---

=SI(ET($K1=0;$K2>0);MAX($L1:$L$2)+1;SI(ET($K1>0;$J2>0);$L1;0))

---

Puis une formule qui fait la somme des valeurs comprises entre deux zéros en M2 et à tirer vers le bas:

Code:

---

=SI($L2=$L1;"";SI(ET($L1=0;$L2>0);SOMME.SI($L:$L;$L2;$K:$K);""))

---

Aperçu du résultat:
Pièce jointe 460804

Avec le fichier:
Pièce jointe 460807

Cdlt

Merci infiniment ARTURO83 , j'ai cherché pendant des heures et des heures, j'étais pratiquement désespéré de trouver la solution.
vraiment merci beaucoup pour l'aide