CountIf

[CtrlAlt]

CountIf.

Wat er zou moeten lukken is dat hij twee dingen optelt met CountIf, in VBA uiteraard.
bvb.

Letters = Application.CountIf( Bereik, "x" & "y")

-> Dit werkt, maar helaas niet wat ik bedoel.
In het voorbeeld hierboven kijkt de CountIf of het X en Z is, meer eigenlijk heb ik nodig waarin hij de X en de Z samen optelt.

*Letters = Application.CountIf( Bereik, "x") + ...CountIf( Bereik, "y")
*Letters = Application.Sum(CountIf( Bereik, "x") + CountIf( Bereik, "y"))

Deze twee sterretjes werken niet dacht ik? Maar weet iemand hoe ik het wel efficiënt zou kunnen doen?

Wel alvast bedankt! :thumb:

 

[Wigi]

Waarom werkt dit niet?

Letters = Application.CountIf(Bereik, "x") + Application.CountIf(Bereik, "y")

 

[CtrlAlt]

M'n excuses ik zie niet dat ik een belangrijk deel van de uitleg ben vergeten. Ik zal het illustreren aan de hand van een klein voorbeeld.

Autoverkopers verkopen BMW Series 1-9 (S1-9), BMW Chargers (SC) en Opels (SO)
Van die verkopers moet er dus geteld worden hoeveel BMW's ze verkopen.

Letters = Application.CountIf(Bereik, "S*") of "S?"

Werkt niet want de Opels zitten erbij

Letters = Application.CountIf(Bereik, "S[0-9]") + Application.CountIf(Bereik, "SC")

Werkt ook niet, hij telt de series niet op bij de variable.

Letters = Application.CountIf(Bereik, "S[!O]")

Werkt ook niet

Letters = Application.CountIf(Bereik, "S1") + Application.CountIf(Bereik, "SC")

dit werkt dan wel, wat mij sterk doet vermoeden dat het probleem bij de wildcard ligt?
Maar [0-9] is toch de wildcard voor cijfers?

Bedankt voor de snelle respons :thumb:
nota: De auto merken kloppen inderdaad niet.