ich möchte gerne eine Tabelle mit Namen "Option" über eine ComboBox im UserForm filtern.
Weil ich das nicht hinbekomme habe ich testhalber in meinem Tabellenblatt zwei OptionButton und eine ´ComboBox (mit Werten von 1 bis 5 gefüllt) angelegt.
Über den OptionButton1 funktioniert das filtern bei z.B. dem Wert 5 mit
Private Sub OptionButton1_Click()
ThisWorkbook.Worksheets("Daten").Activate
ActiveSheet.Range("Option").AutoFilter 1, 5
End Sub
und auch mit
ActiveSheet.Range("Option").AutoFilter 1, ComboBox2.Value
wenn in der ComboBox ein Wert ausgewählt wird, wird meine Tabelle entsprechend diesem Wert gefiltert wenn ich den OptionButton1 aktiviere.
Bei filtern über die ComboBox mit
Private Sub ComboBox2_Change()
ThisWorkbook.Worksheets("Daten").Activate
ActiveSheet.Range("Option").AutoFilter 1, ComboBox2.Value
funktioniert es nicht. Es erscheint in der Zeile "ActiveSheet.Range("Option").AutoFilter 1, ComboBox2.Value" die Fehlermeldung "Laufzeitfehler '1004': Die Autofiltermethode des Range-Objekts konnte nicht durchgeführt werden". Die Tabelle wird aber trotzdem gefiltert.
Warum?
Wie muß der Code lauten damit ich meine Tabelle mit der ComboBox im UserForm filtern kann?
Wäre schön, wenn mir jemand die beiden Fragen beantworten könnte