Mehrere Filter gleichzeitig auf "Alle"
Alex
ich habe in meiner Datei 10 Autofilter.
Benötige eure Hilfe; wie kann ich schreiben, dass Filter 1-7 gleichzeitig aufgehoben, d.h. deaktiviert werden?
Sub FilterAlleAnzeigenÜ()
ActiveSheet.Unprotect "passw"
Selection.AutoFilter Field:=1 'hier Field 1-7 ?
ActiveSheet.EnableAutoFilter = True
ActiveSheet.Protect "passw", DrawingObjects:=True, Contents:=True, Scenarios:=True
End Sub
danke
alex