Bonjour Boreal91,
Au vu de ta compréhension je te joins ces codes (qui ne sont pas de moi et dont j'ignore l'auteur, mais que je remercie ici) :
Filtres automatiques actifs feuille vérouillée
Private Sub Workbook_Open()
With Worksheets('Feuil1')
.EnableAutoFilter = True
.Protect UserInterfaceOnly:=True
End With
End Sub
reviens a mettre
With Worksheets('Feuil1')
.EnableAutoFilter = True
.Protect UserInterfaceOnly:=True
End With
dans ThisWorkbook
Dans la list '(general') tu choisi Workbook
Dans la list '(declaration') tu choisi Open
En te présentant mes meilleurs voeux et une bonne soirée.