Microsoft Office Forum [ www.Office-Fragen.de ] >> READONLY <<

Microsoft Office 2003-2019 => Excel => Thema gestartet von: StefKe am Juni 15, 2016, 15:40:18 Nachmittag

Titel: CountIf
Beitrag von: StefKe am Juni 15, 2016, 15:40:18 Nachmittag

Hallochen allerseits, ich versuche grad mit CountIf alle Einträge der Spalte A zu zählen welche in das Jahr 2016 passen.
Problem dabei ist das die Einträge: "Rg. 2016-003" u.s.w. lauten. Somit funzt leider CountIf nicht mehr.
Gibt es dafür eine elegantere Lösung? Als Schleife mit For Each?

Danke für jede Lösung!
Stefan

Titel: Antw: CountIf
Beitrag von: steve1da am Juni 15, 2016, 16:28:57 Nachmittag

Hola,

Code: [Auswählen]

=SUMMENPRODUKT((ISTZAHL(SUCHEN(2016;A1:A10))*1))
Gruß,
steve1da

Titel: Antw: CountIf
Beitrag von: gmg-cc am Juni 15, 2016, 19:16:53 Nachmittag

Moin,

eigentlich sollte auch CountIf funktionieren ...

Code: [Auswählen]

=ZÄHLENWENN(A1:A100;"Rg. 2016*")

Titel: Antw: CountIf
Beitrag von: StefKe am Juni 16, 2016, 00:35:52 Vormittag

Danke an alle, das Platzhaltersternchen ist schon eine wunderbare Sache.
So sieht es nun aus:

Code: [Auswählen]

Sub JahreZaehlen()
Set adr = Worksheets("Tabelle1").Range("i:i")
Anz = Application.WorksheetFunction.CountIf(adr, "*" & Year(Now) & "*")
Range("B1") = Anz
End Sub
Tut was es soll...
Danke!