AutoFilter trotz Blattschutz

Problem
Sobald der Blattschutz eingeschalten ist, funktioniert der AutoFilter nicht mehr.

Lösung
Mit folgdendem VBA-Code können Sie den AutoFilter auch bei eingeschaltenem Blattschutz aktivieren. Fügen Sie folgenden Code mittels der TastenKombination ALT + F11 in die Programmierumgebung von Excel ein, und zwar unter "DieseArbeitsmappe":


Private Sub Workbook_Open()
    'Autofilter auch bei geschützem Tabellenblatt
     ActiveSheet.Protect ("Password"), userinterfaceonly:=True
     ActiveSheet.EnableAutoFilter = True
End Sub

Hinweis: Ersetzen Sie Password durch ihr Passwort.