vérouiller l'éxécution

[reg]

rebonjour,

Lorsque je vérouille le projet, les autres utilisateurs ne peuvent pas lire les codes VB (j'ai 6 macros) mais peuvent les éxécuter.

Voici ma question :
Comment vérouiller (ou empécher) l'éxécution d'une seule macro (parmi les six)?

Merci d'avance,

Reg

 

[Arnaud]

salut,

et bien tu peut mettre un mot de passe au début de l'exécution de ta macro par exemple

If InputBox("veuillez saisir le mot de passe", "mot de passe") <> "MotDePasse" Then Exit Sub

 

[reg]

Re,

Cette méthode est astucieuse mais mon projet ne me permet pas d'utiliser cette méthode.

En effet, a partir d'un fichier excel d'origine contenant mes macros vb je créer (copie exacte) un deuxième fichier excel.

Si je suis cette méthode, je devrais écrire un mot de passe dans les deux fichiers lors de l'execution. Or j'aimerais interdire l'execution de la macro seulement dans le deuxième fichier.

Je suis dessus depuis hier,

merci,

reg

 

[Arnaud]

re,

c peut être un peu de la magouille mais bon ça passe ^^

si cela doit fonctionner que sur un classeur, il suffit de rajouter la condition selon le nom du classeur :

If ActiveWorkbook.Name = "Classeur1.xls" Then
If InputBox("veuillez saisir le mot de passe", "mot de passe") <> "MotDePasse" Then Exit Sub
end if

 

[Yeahou]

Bonjour Reg, Arnaud, le forum

Reg, as tu essayé l'option private ? cela bloque l'exécution directe mais n'empèche pas l'appel par une autre procédure ou un élément de menu.

soit
option private module
en début de module

soit
private sub essai()
pour une procédure

A+

 

[reg]

re à vous,

j'ai utiliser la bidouille d'Arnaud pour régler mon pb.

Franchement Merci,

maintenant je vais me mettre à faire une barre de progression.

Reg