Protéger toutes les feuilles à la fermeture

[Sam Agace]

Ciao Tutti

Je cherche un code pour protéger toutes les feuilles d'un classeur lors de sa fermeture, quelques soient le nombre de feuilles et les noms de ces feuilles

... et je trouve pas !

... et ça m'agace !

Merci aux ceusses qui auraient une bonne idée sur la sujet

A+

Chris

 

[Robert]

Bonsoir Chris, Bonsoir le forum,

Voici un code à placer dans ThisWorkbook (Microsoft Excel Objetcs) :

Private Sub Workbook_BeforeClose(Cancel As Boolean)
For Each feuille In Sheets
feuille.Protect
Next
ActiveWorkbook.Save
End Sub

Méfie-toi de la ligne “ActiveWorkbook.Save” car elle a l’avantage de ne pas faire apparaître le message te demandant de sauver les modifications (la protection des feuilles), mais elle a l’inconvénient de sauver ce classeur sans te demander ton avis… Tu peux la supprimer selon tes besoins.

À plus,

Robert

 

[Sam Agace]

Salut à tous ... et à toutes of course.

Merci Robert pour ta réponse. C sympa, et en plus, ça marche.

Une question ... Mais comment savez tout ça !

ou plus sérieusement, j'ai besoin d'approfondir mes connaissances en VBE et VBA... vous me conseillez quoi comme bonne lecture

A+

Chris