Filter auf einem geschützten Blatt verwenden

Question

Ich versuche Filter für die Kopfzeile zu verwenden, damit die Benutzer die Daten basierend auf den Filtern auswählen können. Aber schließlich habe ich das gesamte Blatt in meinem VBA-Code wie unten geschützt, um die Benutzer nicht durcheinander zu bringen oder die Daten zu ändern.

Irgendwelche Vorschläge, wie ich die Filter aktivieren und nur die erste Zeile des Data Arbeitsblatts aufheben könnte? diese

Worksheets("Data").Protect Password:="125393" 

     Application.ScreenUpdating = True 
     Application.DisplayAlerts = True 

Answer 1

Versuchen:

With ActiveSheet 
    .Protect Password:="125393", AllowFiltering:=True 
    .EnableSelection = xlUnlockedCells 
End With 

Hoffe, es hilft!