Filter on protected sheet

[VbaHell]

Hello all

I am trying to protect part of my worksheet but still allow sort by filter but this line of code that I put together is not working out, any idea's please

Rows("14:1048576").Select
    Selection.Locked = False
    Selection.FormulaHidden = False
    ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True _
        , AllowSorting:=True, AllowFiltering:=True
        
    ActiveSheet.Protect "Test"

 

[Yongle]

this line protects the sheet and allows sorting and filtering

ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True, AllowSorting:=True, AllowFiltering:=True, Password:="password"

Why are you unlocking all the cells below row 13?
- unlocking unprotects all those cells (17 billion cells) Is that what you want?
- unlocking cells is required to edit cells but sorting and filtering can be done whether the cells are locked or not