Clever-Excel-Forum

Normale Version: VBA-dynamisches Autofilterfield bei Möglichkeit von leeren Spalten nach links
Du siehst gerade eine vereinfachte Darstellung unserer Inhalte. Normale Ansicht mit richtiger Formatierung.
Hallo Leute,

ich habe hier einen VBA code der mir prima meine Liste in der Spalte nach Einträgen filtert, die eine gesuchte Überschrift trägt.




Code:
Sub Schaltfläche1_Klicken()
 
ActiveSheet.Rows("1:1").AutoFilter
Spalte = Cells.Find(What:="gesuchterÜberschriftName").Column
ActiveSheet.Range("$A$1:$J$200").AutoFilter Field:=Spalte, Criteria1:="Hallo"

 
End Sub



Problem: leider funktioniert dieser Code natürlich nur wenn der erste Eintrag in der Spalte A beginnt. Gibt es vielleicht eine Möglichkeit um Zellen auf ihren "Filtermode" zu überprüfen?

vielleicht möchte mir ja jemand helfen,
vielen Dank