Autofiltern mit Makro nach Datum aus Zelle
23.03.2015 14:45:27
Simon
aktuell gebe ich mich folgender Herausforderung und komme leider nicht weiter:
Ich habe zwei Tabellenblätter. Auf dem einen stehen die Daten und auf dem anderen möchte ich auswerten. Mit dem unten gezeigten Code bekomme ich die Tabelle bereits gefiltert. Jedoch würde ich gerne in der Auswertungstabelle in Zelle A1 (Startdatum) und B1 (Enddatum) den Zeitraum fixieren, wie der Autofilter filtern soll. Leider habe ich keinen Plan, wie ich den Zellbezug vom Autofilter von Tabellenblatt1 auf Tabellenblatt2 lege, die entsprechenden Zellen auswähle und mir die Daten ziehe. Habt Ihr vielleicht eine Idee?
Application.ScreenUpdating = False
Sheets("Tabellenblatt1").Select
If ActiveSheet.FilterMode Then ActiveSheet.ShowAllData
ActiveSheet.Range("$C$5:$CA$915").AutoFilter Field:=38, Operator:= _
xlFilterValues, Criteria2:=Array(1, "5/31/2015")
Sheets("Status").Select
Application.ScreenUpdating = True
Vielen Dank im Voraus!
Gruß
Simon