ActiveSheet.Unprotect

[JM]

bonjour,
existe t'il une cde pour déverrouiller une feuille avec ActiveSheet.Unprotect
en ayant le mot de passe ?
(style ActiveSheet.Unprotect, password= "motdepasse" ou qq chose comme ça)
Merci
JM

 

[Eric C]

Bonjour le forum
Bonjour JM

En espérant que cela t'aidera.

Pour déprotéger la feuille :
Sheets("Feuille").Unprotect Password:="mot de passe"

Pour protéger la feuille
Sheets("Feuille").Protect Password:="mot de passe"

Protection de la feuille puis au début de la macro tu mets activesheet.protect contents:=true userinterfaceonly:=true

@ ++ Eric C