in einer Arbeitsmappe habe ich in Tabelle1 einen AutoFilter. Da die Datenbank sehr umfangreich ist möchte ich die Filterkriterien über eine UserForm eingeben. Dies ist notwendig da die Datenbanktabelle über extrem viele Spalten verfügt und ein Bildlauf sehr mühselig ist.
Ein VBA funktioniert:
Sub AutoFilterAn()
Selection.AutoFilter Field:=1, Criteria1:="Filterkriterium"
End
Sub
Field:=1 sollte die Spalte sein und unter Criterial1:= wird der herauszufilternde Wert bzw. _
Text eingegeben.
Nun bräuchte ich eine Verbesserung dahingehend das man die Filterkriterien in die UserForm _
eingeben kann.
Vorab vielen Dank für jedwede Hilfe!
Schoene Gruesse
Winfried