Zellenanzahl mit Kriterium
29.02.2008 12:01:00
FM
nachdem mir vorher schon einmal geholfen wurde beim bestimmen der Anzahl von Zeilen die nicht empty sind mal eine Frage bzgl. dessen.
mit:
AnzZeilen = Sheets("data").Cells(Rows.Count, 1).End(xlUp).Row
bestimme ich nun wieviele Zeilen die Column enthält.
Kann ich zusätzlich noch eine Einschränkung bzw. ein Kriterium angeben:
Sprich beispielsweise:
AnzZeilen = Sheets("data").Cells(Rows.Count, 1).End(xlUp).Row ' aber nur wenn .value der Zelle "Montag" ist
Das heisst am Ende die Anzahl der Zeilen in einer Reihe angezeigt werden die "Montag" enthält.
Bis jetzt ermittle ich das mit einer For Schleife, aber wenn es anders auch geht wäre es wohl effizienter bei großen Datenmengen...
Danke im voraus
FM