XL 2016 Formule calcul

[djam28]

Bonjour à tous,
Je sollicite vos connaissances pour résoudre un petit problème sur excel. J'ai un fichier (ci-joint avec les explications) avec 3 colonnes: temps , DC (binaire 1/0) et une colonne censure où je voudrais mettre une formule qui compte le total des 0 entre entre chaque 1 de la colonne DC (voir les explications sur le fichier ).
Je vous remercie de ce que vous ferez

DE

 

[sylvanu]

Bonjour Djam,
Un essai en PJ avec une fonction perso :

Function NB0(Ligne%)
    If Cells(Ligne, 2) = 0 Then NB0 = "": Exit Function
    If Ligne = 2 And Cells(Ligne, 2) = 1 Then NB0 = 0: Exit Function
    For L = Ligne - 1 To 1 Step -1
        If Cells(L, 2) = 1 Then Exit Function
        NB0 = NB0 + 1
    Next L
End Function

La syntaxe est =NB0(LIGNE())
Dans la PJ la formule est utilisée colonne 7.
A noter certaines erreurs ( colonne 10 ) mais après recomptage, j'ai bien peur que cela soit dans vos résultats et non les miens.

 

[djam28]

Bonjour Sylvanu,
Mille mercis , au top. Une dernière requête, mon vrai tableau ne commence pas à la première ligne et la colonne cible (DC) est différente, peux-tu adapter la macro, je suis vraiment nul, je t'en serai reconnaissant!!
Meci+++

 

[Phil69970]

Bonjour @djam28, Sylvain

Je te propose une variante en VBA

@Phil69970

 

[djam28]

Bonjour Phil69970,
Merci pour cette proposition mais la solution Sylvanu est plus appropriée aux données que je voudrais traiter
Merci en tout cas. J’attends le retour de Sylvanu
Bonne soirée à vous tous

 

[sylvanu]

Re le fil,
Si le tableau peut être n'importe où alors il faut lui préciser où il commence.
Un ex avec :

Function NB0(Ligne%, Colonne%, LigneDébut%)
    Application.Volatile
    If Cells(Ligne, Colonne - 1) = 0 Then NB0 = "": Exit Function
    If Cells(Ligne, Colonne - 1) = 1 And Cells(Ligne - 1, Colonne) = "Censure" Then NB0 = 0: Exit Function
    For L = Ligne - 1 To LigneDébut + 1 Step -1
        If Cells(L, Colonne - 1) = 1 Then Exit Function
        NB0 = NB0 + 1
    Next L
End Function

 

[djam28]

Merci bcp Sylvanu, nickel!

 

[djam28]

Bonjour @djam28, Sylvain

Je te propose une variante en VBA

@Phil69970

Bonsoir Phil,
Je voudrais reprendre ta suggestion, avec comme critère le compte des 0 entre les 1 et non le nombre des lignes , ci joint l'exemple. (en rouge le résultat attendu) ..si c'est possible en formule ou sinon en VBA macro
Merci beaucoup
DE

 

[Phil69970]

Re le fil

Voici le fichier modifié :

Comme il y a une erreur en "J18" et en "J23" j'ai mis les résultats dans la colonne L

@Phil69970

 

[djam28]

Super! Un grand merci Phil

 

[djam28]

Re le fil

Voici le fichier modifié :

Comme il y a une erreur en "J18" et en "J23" j'ai mis les résultats dans la colonne L

@Phil69970

Bonsoir Phil,
Désolé de vous déranger à nouveau, votre stratégie répond à mes attentes. Cela étant, j'ai changé ma façon de faire et je voudrais apporter un petit changement à ta macro. Je voudrais faire la somme de la colonne rouge entre chaque 1 (en jaune). J'ai mis un exemple plus parlant. MERCI INFINIMENT

 

[Phil69970]

Re le fil

Voici le fichier modifié :

Cela étant, j'ai changé ma façon de faire et je voudrais apporter un petit changement à ta macro

*Il serait bon de ne pas changer tout le temps mais de réfléchir à la manière de concevoir votre fichier

@Phil69970

 

[djam28]

Merci beaucoup Chef. Très bonne journée