Unprotect

mikael2403 · 13 Février 2008

Bonjour,

Je souhaite supprimer la protection d'une feuille qui contient un mot de passe lors de l'exécution d'une macro.

Avec l'enregistreur de macro j'ai juste le code suivant :

Code:

ActiveSheet.Unprotect

Existe-t-il un moyen de supprimer la protection de la feuille et d'intégrer à la macro le mot de passe afin qu'il le saisisse tout seul ?

Je vous remercie d'avance pour votre aide.

Mikael

Cousinhub · 13 Février 2008

Re : Unprotect

bonjour, regarde les codes :

mot de passe : essai

Code:

Sub protege()
Sheets("Feuil1").Protect "essai"
End Sub

Sub deprotege()
Sheets("Feuil1").Unprotect "essai"
End Sub

Edit : Bonjour jeanpierre, belle journée, du moins en Bretagne

jeanpierre · 13 Février 2008

Re : Unprotect

Bonjour Mikael,

avec : ActiveSheet.Unprotect ("ton mot de passe")

et, par exemple pour réportéger : ActiveSheet.Protect password:="ton mot de passe"

Tu nous dis.

Jean-Pierre

Edit : Bonjour bhbh, un peu lent moi

mikael2403 · 13 Février 2008

Re : Unprotect

Re,

Merci beaucoup.
Les 2 solutions fonctionnent parfaitement.

Merci encore pour votre aide.

Mikael

Unprotect

mikael2403

XLDnaute Junior

Cousinhub

XLDnaute Barbatruc

jeanpierre

Nous a quitté

mikael2403

XLDnaute Junior

Discussions similaires