ich wäre sehr Dankbar wenn ich zu dem nachfolgenden Problem Unterstützung bekäme.
Nachfolgendes Makro habe ich mir zusammengebastelt. Funktioniert aber nur über einen zusätzlichen Button dem ich das Makro zugewiesen habe.
Meine Frage ist:
Welchen Befehl muss ich einbauen damit der im Tabellenblatt "Eingabe" stehende Zellwert ("B12") durch betätigen der Taste "Enter" im Tabellenblatt "Liste" automatisch gefiltert wird.
Hintergrund ist das ich auf den zusätzlichen Button für das Makro verzichten möchte.
Ein Hinweis noch: Das Tabellenblatt "Eingabe" ist geschützt. Eine Eingabe ist nur in der Zelle "E12" möglich.
Sub FilterKst()
Application.DisplayAlerts = False
Sheets("Eingabe").Select
Range("E12").Select
Selection.Copy
Sheets("Liste").Select
Selection.AutoFilter Field:=1, Criteria1:=Sheets("Eingabe").Range("E12").Value
Range("A3").Select
Application.DisplayAlerts = True
End Sub
Vielen Dank im Voraus.Gruß Udo