Bonjour,

je souhaite en VBA pouvoir mettre un password a mon project... mais rien y fait !!!
J'ai essaye le code suivant (meme hors mode debug - en pas en pas) ca ne marche pas

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
 
Password = "toto"
If ActiveDocument.VBProject.Protection = 0 Then
    Application.VBE.CommandBars(1).FindControl(ID:=2578, recursive:=True).Execute
    SendKeys "^{TAB}" & "{SPACE}" & "{TAB}" & Password & "{TAB}" & Password & "{ENTER}{ESC}", True
End If
La fenetre pour entrer le mot de passe s'ouvre, mas apparement le SendKeys n'a aucune action et la fenetre reste ouverte...

Quelqu'un a t'il deja realise cette operation avec succes?

Par avance merci pour vos idees/solutions

Daniel.