aantal cellen tellen als er een waarde is ingevuld (niet formules)

[Friend]

Beste forummers

Graag zou ik het aantal cellen willen tellen (A10) als er een waarde staat vermeld in cel A1 tot A9.
Het probleem is dat hij nu ook de cellen meetelt waar een formule in staat.

Zie voorbeeld bestand.

Hoe kan ik dit aanpassen?

Hartelijk dank.

Friend

 

[JEC.]

Bvb

=AANTAL.ALS(A1:A10;"><")
of
=AANTAL.ALS(A1:A10;"?*")
of
=SOM(N((A1:A10<>"")))

Niet de simpelste, maar eentje om over na te denken

=REDUCE(0;A1:A10;LAMBDA(x;y;x+(LENGTE(y)>0)))

 

[AlexCEL]

In alle cellen in bereik A1:A10 staat een formule, geen waarden.
Waarom niet naar kolom B kijken:

=AANTALARG(B1:B10)

 

[Friend]

JEC en Alex,

Hartelijk dank voor jullie reactie:thumb:

Alex jouw code telt alle velden ook die geen waarde maar wel een formule bevatten.

Jec

Deze code

=AANTAL.ALS(A1:A10;"><")

werkt prima.

Hartelijk dank.

Friend

 

[AlexCEL]

Waarom niet naar kolom B kijken:

Hier kon ik geen formules in ontdekken namelijk, dus geeft deze ook de gewenste resultaten.

=AANTALARG([COLOR="#FF0000"]B1:B10[/COLOR])

 

[Friend]

Alex,

Excuus ik las te snel en zag niet je verwijzing naar kolom B.
In mijn originele file heb ik niet een kolom B maar verwijs ik naar een ander bestand.

Jec,

Dit :

=REDUCE(0;A1:A10;LAMBDA(x;y;x+(LENGTE(y)>0)))

wordt wel een hele diepe nadenker voor mij
Ik heb deze zin gevonden dus daar begin ik maar : The Excel LAMBDA function provides a way create custom functions that can be reused throughout a workbook, without VBA or macros.

Friend

 

[JEC.]

Dat is onder andere wat je met lambda kunt doen. Lambda wordt hier gebruikt om een matrix af te lopen. Je kunt het zien als een for next loop, waar steeds 1 bij “x”(startend bij 0) wordt opgeteld zodra een cel niet leeg is.

 

[HansDouwe]

Fijn JEC dat je het voorbeeldje van REDUCE ... LAMBDA liet zien.
Zeer leerzaam en schept veel mogelijkheden om zaken waar je eerst VBA voor nodig had, nu zonder VBA op te lossen.
Bedankt.

 

[JEC.]

Alstu!
Hier staat nog een voorbeeld met lambda

https://www.helpmij.nl/forum/showthread.php/965025-Meerdere-tekstvelden-samenvoegen-in-Excel?