wie kann ich per vba feststellen, bei wievielen spalten ich autofilter gesetzt habe?
vielen dank im voraus!
herbert
Sub GesetzteAutoFilter()
Dim n%, i%, s%
If ActiveSheet.AutoFilterMode Then
n = ActiveSheet.AutoFilter.Filters.Count
For i = 1 To n
If ActiveSheet.AutoFilter.Filters(i).On Then s = s + 1
Next i
MsgBox s
End If
End Sub
Gruß
Andreas