Discussion :

[Pilote1152]

Bonjour,

Mon code VBA utilise le mot de passe de protection de la feuille. Il ne faut donc pas que l'utilisateur puisse le modifier à partir de la barre de menus (voire par un autre chemin si cela est aussi possible????)
J'ai donc pensé à intercepter un appel à cette commande (Révision / Protéger la feuille) pour lancer une procédure qui donnerait possibilité de mettre un nouveau mot de passe par formulaire..... avec modification en cascade du code VBA qui l'utilise.

J'ai bien cherché mais ne vois pas pourquoi le code ci-dessous ne fonctionne pas ????=erreur 5 Argument ou appel de procédure incorrect

Merci de votre aide ou éclairage
Cordialement

Code :

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

1
2
3
sub Workbook_Open()
CommandBars(1).Controls("Révision").Controls("Protéger la feuille").OnAction="ModifierMDP"
end sub

[Belga16]

Il vaut mieux utiliser les propriétés du projet VBA (via Outils) dans lequel vous pouvez encoder un mot de passe que vous seul connaitrez. La feuille doit être protégée également.
Ce faisant personne ne pourra changer quoi que ce soit aux cellules protégées, ni à votre code.
Si, par contre, vous voulez permettre à certains utilisateurs de manipuler le mot de passe, alors c'est plutôt un problème organisationnel qui sera difficile à gérer.

[Pilote1152]

Il vaut mieux utiliser les propriétés du projet VBA (via Outils) dans lequel vous pouvez encoder un mot de passe que vous seul connaitrez. La feuille doit être protégée également.
Ce faisant personne ne pourra changer quoi que ce soit aux cellules protégées, ni à votre code.
Si, par contre, vous voulez permettre à certains utilisateurs de manipuler le mot de passe, alors c'est plutôt un problème organisationnel qui sera difficile à gérer.

bonsoir Belga,
je te remercie pour ce retour.
malheureusement je me trouve effectivement dans la situation exposée en fin de post. J'ai effectivement prévu de protéger mon code pour empêcher quiconque de retrouver le mot de passe ..... Et c'est bien là mon problème ... IL FAUT que tout changement de mot de passe passe par ma macro our être logé là où je l'attends!!!

Mon problème reste entier à ce stade
bonne soirée

[Belga16]

Vous pouvez changer de concept: utiliser une table paramétrique (protégée et cachée) des utilisateurs du style User1, MDP1, User2, MDP2, .. etc
On peut par ce biais, gérer l'accès par utilisateur, qui à son tour pourra changer son MDP à loisir, mais le cœur de votre programme reste inviolable pour les initiés.

[Pilote1152]

Vous pouvez changer de concept: utiliser une table paramétrique (protégée et cachée) des utilisateurs du style User1, MDP1, User2, MDP2, .. etc
On peut par ce biais, gérer l'accès par utilisateur, qui à son tour pourra changer son MDP à loisir, mais le cœur de votre programme reste inviolable pour les initiés.

Bonjour Belga16,

Merci pour cette nouvelle piste. Mais j'avoue ne pas savoir comment on crée une telle table .....
Ceci étant peut être n'ai-je pas été assez précis mais il ne s'agit pas d'empêcher la "déprotection" de la feuille à certains utilisateurs .... mais de les empêcher de modifier le mot de passe de la protection pour nuire aux autres !!! C'est donc la raison pour laquelle je cherche à intercepter cette commande pour lancer ma macro espion (permet de retrouver le mot de passe).
Avez-vous par ailleurs une idée sur la raison du plantage de mon code cité en début de post ? (j'ai pourtant suivi les exemples vus sur le Net pour CommandBars)

Merci encore pour l'intérêt que vous portez à mon problème?
Cordialement

[Arkham46]

Bonjour,

Mais j'avoue ne pas savoir comment on crée une telle table .....

Moi non plus...même si j'imagine un peu une feuille cachée, mais quel intérêt ?

Avez-vous par ailleurs une idée sur la raison du plantage de mon code cité en début de post ? (j'ai pourtant suivi les exemples vus sur le Net pour CommandBars)

Depuis 2017 c'est dans le ruban que cela se passe, avec des tags <command>.

Ceci dit on ne pourrait pas récupérer un éventuel mot de passe saisi dans la fenêtre standard.
Il faudrait annuler la fenêtre standard et programmer autre chose.
Quand à modifier le VBA à la volée, c'est quelque peu risqué.