Protection VBA bloquant l'enregitrement

[joebar2000]

Bonjour à tout le forum,

Je souhaite faire exécuter par des utilisateurs une macro mais qu'ils ne puissent pas en voir le contenu.

J'ai donc protéger le projet VBA via le menu outil.

Cependant cela bloque tout enregistrement du fichier or je souhaite qu'à la fin de la macro elle enregistre automatiquement le fichier sous un autre nom.

J'ai donc insérer la commande (b et a étant des variables définies plus haut dans la macro)

ActiveWorkbook.SaveAs Filename:= _
b & "\TRIPLET" & a & ".xls", FileFormat:= _
xlExcel9795, Password:="", WriteResPassword:="", ReadOnlyRecommended:= _
False, CreateBackup:=False

Ma question est donc quelle est la fonction qui permet de déprotéger un projet VBA pour permettre l'enregistrement puis de le reprotéger ensuite de façon à ce que les utilsateurs ne puissent pas aller voir le programme par la suite?

Je vous remercie d'avance de vos éclairages lumineux.

Joebar

 

[Wan]

Re : Protection VBA bloquant l'enregitrement

Bonjour Joebar,

Je pense que tu trouveras ton compte là dedans :
Ce lien n'existe plus

Pour enregistrer je suppose que tu n'as pas de mal à le faire sinon sur le lien que je t'ai donnée tu le trouveras aussi une solution à ton problème.
Erwan

 

[joebar2000]

Re : Protection VBA bloquant l'enregitrement

Merci beaucoup

Je vais faire des essais et voir si j'arrive à importer ces macros

 

[joebar2000]

Re : Protection VBA bloquant l'enregitrement

Re-bonjour au forum,

Hélas ça ne marche pas donc j'aurai encore besoin d'un petit conseil


Voilà comment j'ai intégré la macro du lien:

UnprotectVBAProject ActiveWorkbook, "xxxxxxxx"

ActiveWorkbook.SaveAs Filename:= _
b & "\TRIPLET" & a & ".xls", FileFormat:= _
xlExcel9795, Password:="", WriteResPassword:="", ReadOnlyRecommended:= _
False, CreateBackup:=False

ProtectVBAProject ActiveWorkbook, "xxxxxxxx"

et voilà la réponse qui m'est faite

Erreur de compilation:
Sub ou function non définie

Or la déprotection-protection est intégrée à la fin de ma macro avec bien les sub et end sub qu'il faut.

J'ai tenté plusieurs trucs mais en vain et je bloque toujours.

Je vous remercie d'avance de continuer à éclaircir mon pb.

Joebar

 

[Wan]

Re : Protection VBA bloquant l'enregitrement

L'erreur de compilation indique que tu as surement oublier un "end sub" pour un "sub function".

Vérifie bien ce que tu as écris ensuite on verra ensemble sinon peut etre peux tu me sortir un exemplaire de ton fichier sous pièce jointe avec des données fausses bien sur pour connaitre le problème merci.

Erwan

 

[PascalXLD]

Re : Protection VBA bloquant l'enregitrement

Bonjour

je crois que depuis le problème est résolu. Voir ce fil

https://www.excel-downloads.com/threads/protection-de-macro.64992/

Bonne journée