Clever-Excel-Forum

Normale Version: Kein Makro bei Tabellenfilter
Du siehst gerade eine vereinfachte Darstellung unserer Inhalte. Normale Ansicht mit richtiger Formatierung.
Moin in die Runde:

Wie würde eine VBA-Zeile aussehen, die sagt, dass ein Makro nicht ausgeführt werden soll, wenn die Tabelle gefiltert ist? Geht das überhaupt?
Grüß dich Dorzen14,

versuchs Mal so:

Code:
Sub Check_FilterMode()

If ArbeitsblattX.ListObjects("TabelleY").AutoFilter.FilterMode Then
MsgBox "Filter ist an - Makro bitte nicht ausführen."
Exit Sub
Else
MsgBox "Filter ist aus"
End If

End Sub
Hi

Gibt da sicher mehrere Möglichkeiten.
Code:
If ActiveSheet.AutoFilter.Range.SpecialCells(xlCellTypeVisible).Count <> ActiveSheet.AutoFilter.Range.Cells.Count Then Exit Sub
Gruß Elex