Discussion :

[dlight]

Bonjour.

Je cherche à incorporer dans mon code vba le mot de passe d'une feuille protégée. Pour enlever la protection de la feuille, j'ai utilisé :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

ActiveSheet.Unprotect ("toto111")

- Cela fonctionne parfaitement.

Puis à la fin du code, j'ai utilisé :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

ActiveSheet.Protect Password:="toto111", DrawingObjects:=True,Contents:=True,Scenarios:=True

Mon problème est que le code ne donne pas toto111 comme mot de passe mais un autre mot de passe que j'ignore.

J'ai utilisé une variable (pw="toto111") me permettant de visualiser le code pas à pas afin de voir le mot de passe qui serait inscrit lors de la protection mais j'ai encore le même problème. Le mot de passe inscrit n'est jamais toto111 même si je vois suis en mesure de voir que le code affiche toto111 comme mot de passe.

Quelqu'un peut m'indiquer ce qui ne va pas ???

[alsimbad]

je ne sais pas exactement ce qui ne va pas, mais peut etre que tu complique trop. essaye ceci, c'est simple et efficace

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
 
Sub test()
ActiveSheet.Protect "toto111"
variable = "toto111"
ActiveSheet.Unprotect variable
End Sub

[dlight]

Simple et efficace...

C'est parfait...
Merci alsimbad