auto filter on protected sheet > not working

[bluepenink]

hello

this is my code on workbook open, but for some reason, its not letting the auto filter to work...any suggestions?!

Private Sub Workbook_Open()
For c = 1 To Sheets.Count
               With Worksheets(c)
               .EnableAutoFilter = True
        .Protect Password:="analyst", userinterfaceonly:=True, Contents:=True, Scenarios:=True, _
            AllowFormattingColumns:=True, AllowFormattingCells:=True, AllowFormattingRows:=True
        .EnableOutlining = True
     
    End With
Next c
End Sub

pls and thx u

 

[Jerry Sullivan]

Hi bluepenink,

.EnableAutoFilter = True
enables the AutoFilter arrows on a protected worksheet,
but it won't cause a range to be AutoFiltered if it wasn't
already AutoFiltered when you last saved and closed your workbook.

Use the Range.Autofilter Method to set an AutoFilter.