Bonsoir
Extrait de l'aide de Protect
UserInterfaceOnly
Facultatif
True pour protéger l'interface utilisateur, mais pas les macros. Si cet argument est omis, la protection s'applique à la fois aux macros et à l'interface utilisateur.
Private Sub Workbook_Open()
Sheets(1).Protect Password:="", UserInterfaceOnly:=True
End Sub