M'aider a figer une feuille mais en laissant une ligne

Bonjour,

j'ai ecriit un code pour figer ou verrouiller un feuille, voir ci-dessous :

Private Sub Workbook_Open()

With Worksheets("Inscription")
.Protect Password:="1234", DrawingObjects:=True, contents:=True, Scenarios:=True, UserInterfaceOnly:=True
.EnableSelection = xlNoSelection 'pas de selection cellule
End With

End Sub
mais je voudrais le verrouiller en laissant la possibilité de faire des filtre sur un ligne par exemple.