Re : titre
Re,jeanpierre
voici mon code
Private Sub Workbook_Open()
'interdire la sortie
YLOCK = True
'Résurrection:
Dim CmdB As CommandBar
For Each CmdB In Application.CommandBars
CmdB.Enabled = False
Next CmdB
' Suppression la barre reduire agrandir fermer...