AutoFilter deaktivieren
07.11.2006 16:17:54
Michael
Ich habe eine Tabelle mit ca. 70 Spalten. Über die ganzen 70 Spalten setze ich nun den Autofilter. Ein Makro ermöglicht mir, alle Filter per Knopfdruck zu deaktivieren. Das dauert aber sehr lange. Gibt es eine andere Möglichkeit, alle Filter auf einmal zu deaktivieren? (egal wie, einfach schneller!)
Mein Makro:
Sub Filter_ausschalten()
On Error Resume Next
Application.ScreenUpdating = False
For i = 1 To 80
Selection.AutoFilter Field:=i
Next i
Application.ScreenUpdating = True
End Sub