meerdere bereiken optellen

[BasEx]

Beste helpers,

In een rij in excel heb ik de volgende gegevens staan (alle getallen staan in aparte cellen):
0 1 1 0 0 0 1 1 1 1 0 0 1 0 1 1 1 0 0

Nu wil ik graag dat excel mij vertelt:
- Hoeveel reeksen van 1'en er in bovenstaande cellen staan (4 in dit geval), en
- Wat de som is van elk van de reeksen (2, 4, 1 en 3 in dit voorbeeld).

Weet iemand hiervoor een formule of een macro?
Alvast dank
Groet, Bas

 

[Wigi]

Met formules kan dit zeker, google al eens op "excel consecutive zeros".

Wigi

 

[bandito bob]

Hier een oplossing met 1 hulp rij.
Zoals te zien is het aantal reeksen zeer makkelijk, maar de som van de reeksen is wat moeilijker. Misschien dat een ander een betere oplossing kan bedenken. Ik kan me voorstellen dat het met de interval functie misschien wel makkelijker kan.

 

[Wigi]

Beste helpers,

In een rij in excel heb ik de volgende gegevens staan (alle getallen staan in aparte cellen):
0 1 1 0 0 0 1 1 1 1 0 0 1 0 1 1 1 0 0

Nu wil ik graag dat excel mij vertelt:
- Hoeveel reeksen van 1'en er in bovenstaande cellen staan (4 in dit geval), en
- Wat de som is van elk van de reeksen (2, 4, 1 en 3 in dit voorbeeld).

Weet iemand hiervoor een formule of een macro?
Alvast dank
Groet, Bas

Gelieve aub niet te crossposten door deze vraag ook in de Microsoft Excel Nieuwsgroep neer te zetten. Jij verspilt de tijd van helpers die belangeloos hun vrije tijd opofferen voor jou.

Wigi

 

[WHER]

En hier nog een variatie op de oplossing in post #3

 

[snb]

en in VBA

Sub tst()
  sq = Filter(Split(Join(WorksheetFunction.Transpose(WorksheetFunction.Transpose([A1:Q1])), ""), 0), 1)
    
  [B10] = UBound(sq) + 1
  For j = 0 To UBound(sq)
    [B11].Offset(, j) = Len(sq(j))
  Next
End Sub