hoffentlich kann mir jemand von Euch helfen!
Ich habe ein Makro geschrieben, dass ich starten möchte sobald eine Einstellung am Filter durchgeführt wird.
Kann mir jemand sagen wie das geht?
Vielen Dank für Eure Hilfe!!!
Grüße,
Ensinger
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If ActiveSheet.AutoFilterMode = True Then MsgBox "Wahr"
End Sub
MfG
Martin
if activesheet.Autofilter.RAnge.rows.Count Activesheet.autofilter.Range.Specialcells( _
xlcelltypevisible).rows.count then
msgbox "der filter ist aktiv"
else
msgbox "es sind alle Zeilen sichtbar"
end if
Gruß, Daniel