Bonjour,
Examine l'option Userinterfaceonly ... placé dans "ThisWorkbook" > " Private Sub Workbook_Open() " ... permet de verrouiller l'accès utilisateurs, mais laisse les codes VBA s'exécuter sans devoir déverrouiller.
Dans la macro Workbook_Open, l'on choisit de verrouiller toutes les feuilles ou celles désirées ... avec ou sans mot de passe.
Sub auto_open()
Sheets(1).Protect Password:="mon mot de passe", userinterfaceonly:=True
End Sub
ou sans mot de passe
Sub auto_open()
Sheets(1).Protect userinterfaceonly:=True
End Sub
Source : http://boisgontierjacques.free.fr/pages_site/protection.htm
ric