Discussion :

[Nikodemus]

Bonjour à tous,

Je possède un fichier Excel avec son projet protégé par un mot de passe.
Lorsque j'utilise ce fichier, je suis dans l'obligation d'exécuter un code qui retire la protection du projet et la réactive. Cette partie fonctionne bien.

Malheureusement, le code est bien re-protégé mais libre d'accès !!! (Code vba lisible par n'importe qui).
Je ne souhaite pas cela. J'aimerai que la protection se réactive immédiatement sans être obligé de fermer et de relancer le fichier (une sorte d'actualisation de la protection).

Cela est-il possible ?
Merci par avance.

[Oliv-]

salut,
qu'est ce qui t'oblige à retirer cette protection sur vbe ?

[casefayere]

Bonjour,
dans l'éditeur,
click droit sur VBAProject => Propriétés de VBAProject, tu pourras mettre ton mot de passe

[Nikodemus]

Oliv- : Je suis obligé de retirer la protection pour exécuter ce code :

Code :

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

ThisWorkbook.VBProject.VBComponents("UserForm2").Activate

Sinon mon fichier plante.


casefayere : Ma macro de réactivation fait cela sauf que le code reste accessible jusqu'au redémarrage du fichier.

[Oliv-]

je pense que tu dois règler ce problème de formulaire c'est la seule voie.

il a quoi de particulier ce formulaire ?

[Nikodemus]

Je sais bien mais j'ai tout essayer je n'ai jamais trouvé.
Ce Userform contient une centaine de TextBox, et une vingtaine de ComboBox qui permettent de renseigner les données dans les différentes cellules de mes onglets Excel.
Peux importe ce que je fais la macro plante aléatoirement sur le formulaire si je ne lance pas ce bout de code.
Et j'ai besoin de déprotéger le projet pour le lancer sinon ça plante aussi.

Comme plusieurs utilisateurs se servent du fichier, j'aimerai que le code se "re-masque" lors de la re-protection (de nouveau inaccessible par débogage ou ALT+F11)

[Oliv-]

Si tu as un formulaire d'affiché à quel moment ils peuvent aller dans VBE ?

une piste pour masquer vbe

Code :

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

 Application.VBE.MainWindow.Visible = false