Proteger classeur en le quittant

jeanba à dit:

Bonjour à tous,
Je suis très heureux de revenir parmi vous.
Petit souci de macro de protection de classeur en le quittant.
(voir ci-joint). merci.
jeanba

Cliquez pour agrandir...

voir ci-joint

Cliquez pour agrandir...

Spitnolan08 à dit:

Bonjour,Tu n'aurais pas oublié quelque chose?

Cordialement

Edit : Bonjour BrunoM45

Cliquez pour agrandir...

Staple1600 à dit:

Bonjour

Le code VB ci-dessous est mettre dans ThisWorkBook
(pas dans un module)

Code:

Private Sub Workbook_BeforeClose(Cancel As Boolean)
Dim S As Worksheet
For Each S In Worksheets
S.Protect Password:="toto"
Next
End Sub

Cliquez pour agrandir...