Bonjour,
j ai testé la solution de Jean Eric
a l ouverture du fichier toutes les feuilles sont bien protégées et en activant "ôter le mot de passe" dans l'onglet de la feuille, la feuille n est plus protégée sans même que l utilisateur indique un mot de passe.
normal puisque PWd n(est pas défini sans la sub donc égal à vide...
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Dim ws As Worksheet
For Each ws In ThisWorkbook.Worksheets
ws.Protect Password:=PWd, UserInterfaceOnly:=True
Next
ThisWorkbook.Save
End Sub
pour comprendre : comment se fait il qu'en supprimant les différents codes VBA la protection des feuilles reste active ?
le fait de supprimer du code ne correspond pas à "lancer" la procédure de supprimer les protection.
Le code vous permet d'actionner un "bouton" de protection mais le fait de le supprimer n'a aucune incidence sur ce bouton.
C'est comme une télécommande de TV, vous appuyez sur le bouton allumage et la télé s'allume, vous jetez à la poubelle la télécommande, la télé reste allumée, elle ne s'éteint pas
@ bientôt
LouReeD