Autofilter
30.01.2007 17:52:18
Krebs
Wie kann ich per Makro oder VBA das Autofilter aufrufen und Benutzerdefinierte Eingaben machen und dann die gefilterten Daten ausdrucken? Mein Makro sieht folgendermassen aus:
Sub Test()
' Test Makro
' Makro am 30.01.2007 von Krebs Hansjörg aufgezeichnet
Application.Run "Isl_liste_Jan07.xls!KreditEingeben"
Selection.AutoFilter
Selection.AutoFilter Field:=7, Criteria1:=">=01.01.2006", Operator:=xlAnd _
, Criteria2:="<=01.12.2006"
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
End Sub
das Datum das jetzt unter Criteria 1 oder 2 erscheint möchte ich aber jedesmal in der Autofilter Maske eingeben. Diese Maske erscheint aber gar nicht mehr.
Kann mir jemand helfen?
vielen Dank
Hansjörg