Bezeichnung des leeren Autofilters in Makro (keine Zahl)

[Teetrinker]

Hallo,

ich würde mich über Hilfe bei folgender Sache freuen:

Je nach eingegeben Ausgangswert in einer anderen Spalte ändert sich in den zwei hier behandelten Spalte die Anzahl der unterschiedlichen Einträge. In meinem Makro möchte ich nun jedoch jedes Mal den leeren Autofilter abwählen, also mir nur gefüllte Zellen anzeigen lassen.

Das Problem dabei ist jetzt, dass das Abwählen des leeren Autofilters von der Anzahl der Einträge abhängig ist. Beispielsweise ist er einmal an 25 und einmal an 26:

Code:

Sub Makro6()
'
' Makro6 Makro
'

'
    Range("_201920[[#Headers],[HomePoints_passend_Werte_Endziel]]").Select
    Selection.AutoFilter
    ActiveSheet.ListObjects("_201920").Range.AutoFilter Field:=25, Criteria1:= _
        "<>"
    ActiveSheet.ListObjects("_201920").Range.AutoFilter Field:=26, Criteria1:= _
        "<>"
End Sub

Ich möchte ihn allerdings konstant abwählen und dafür bräuchte es wohl eine feste Bezeichnung anstatt 25 und 26. Gibt es so etwas?

[Klaus-Dieter]

Hallo,

warum willst du den Autofilter per Makro steuern?

[Kuwer]

Hallo Teetrinker,

Code:

Sub Makro6()
  With ActiveSheet.ListObjects("_201920")
    If .AutoFilter.FilterMode Then
      .AutoFilter.ShowAllData
    End If
  End With
End Sub

Gruß Uwe