Erweiterter Filter mit 3. Kriterium
08.11.2016 11:41:48
Birke
folgende Ausgangslage:
In Spalte 1 stehen Uhrzeitwerte im Viertelstundentakt über ein Jahr (35040 Zeilen), soll heißen:
Zeit
00:15
00:30
00:45
...
In Spalte 2 steht das jeweilige Datum (Passend zu Spalte 1), heißt es ändert sich logischerweise nur alle 96 Zeilen:
Datum
01.01.
01.01.
01.01.
...
In Spalte 3 stehen Zahlenwerte, welche nach bestimmten Kriterien aus den beiden ersten Spalten gefiltert werden sollen:
Zahlenwerte
17394
19230
12300
...
Ich bekomme jetzt ein Zeitfenster vorgegeben, nach dem ich Filtern muss.
Beispielsweise von 04:00 bis 07:00 Uhr.
Die Zahlenwerte aus diesem Zeitfenster müssen jetzt addiert werden und wieder ausgegeben werden.
Dies muss für jeden Tag einzeln geschehen!
Und genau dass ist mein Problem.
Rein nach Zeitfenstern kann ich filtern mit:
Range("$A$3:$C$35042").AutoFilter Field:=1, Criteria1:=">=" & StartZeitfenster, Operator:=xlAnd, Criteria2:="
Die Summe der gefilterten Werte gebe ich über
Range("I1") = Application.WorksheetFunction.Subtotal(9, Columns(3))
wieder aus.
Jedoch scheitere ich daran ein drittes Kriterium (Datum) für den Autofilter zu implementieren.
Anders gesagt: Ich bekomme jetzt EINEN Summenwert, ich möchte aber 365 Summenwerte.
Vielen Dank schonmal im Voraus!
Beste Grüße,
Birke