OVH Cloud OVH Cloud

protection macro

8 réponses
Avatar
Donnazac
Bonjour
Je suis sous win Xp et excel 2003 j'ai crée un fichier pour une association
et bien que les feuilles de mon classeur soient protégées avec un code
quelqu'un a pu supprimer une macro. En effet même si la feuille est protégé
le menu Outils --> Macro est toujours accessible et on peut supprimer
n'inporte quel macros. J'ai essayé d'enregistrer une macro "supprimer une
macro" mais rien n'a été enregistré, cela fait plusieurs jours que j'essaie
de trouver . Avez-vous une solution?
Merci
Cordialement
Anne-Marie

8 réponses

Avatar
Starwing
Bonjour,

ALT + F11
Va dans Outilis - Propriétés de VBAProject - Protection - verrouillé le
projet pour l'affichage et inscrit un mot de passe

Starwing
Avatar
FxM
Bonsoir,

... et bien le noter quelque part car la Ferrari est pleine.

@+
FxM



Bonjour,

ALT + F11
Va dans Outilis - Propriétés de VBAProject - Protection - verrouillé le
projet pour l'affichage et inscrit un mot de passe

Starwing




Avatar
Donnazac
Merci ca m'a bien aidé
Amicalement
Anne-Marie

"Starwing" a écrit dans le message de
news:
Bonjour,

ALT + F11
Va dans Outilis - Propriétés de VBAProject - Protection - verrouillé le
projet pour l'affichage et inscrit un mot de passe

Starwing




Avatar
Starwing
Bonjour Anne-Marie,

Je suis désolé, après avoir écrit la première réponse, j'ai constaté que le
résultat ne donnerait rien. J'ai tenté, mais en vain d'annuler mon premier
message...;-((
Ce qui veut dire que l'utilisateur a encore le droit de détruire tes
macros...

Je propose donc une autre solution:

Dans le ThisWorkbook:

Private Sub Workbook_Open()
Application.CommandBars("Tools").FindControl(ID:R2).Enabled = False
Application.CommandBars("Tools").FindControl(ID:0017).Enabled = False
End Sub

Private Sub Workbook_BeforeClose(Cancel As Boolean)
Application.CommandBars("Tools").FindControl(ID:R2).Enabled = True
Application.CommandBars("Tools").FindControl(ID:0017).Enabled = True
End Sub

Comme cela, l'utilisateur n'aura même plus droit d'utiliser la commande
Outils-Macro
La commande sera complètement bloqué.


Starwing
Avatar
Vincent
Bonjour.
Quelque chose de plus simple pour masquer les macros
Mettre en tête de module :
Option Private Module
Avec cela, les macros seront invisible
Bonne soirée
Vincent



"Starwing" a écrit dans le message de news:

Bonjour Anne-Marie,

Je suis désolé, après avoir écrit la première réponse, j'ai constaté que
le
résultat ne donnerait rien. J'ai tenté, mais en vain d'annuler mon premier
message...;-((
Ce qui veut dire que l'utilisateur a encore le droit de détruire tes
macros...

Je propose donc une autre solution:

Dans le ThisWorkbook:

Private Sub Workbook_Open()
Application.CommandBars("Tools").FindControl(ID:R2).Enabled = False
Application.CommandBars("Tools").FindControl(ID:0017).Enabled = False
End Sub

Private Sub Workbook_BeforeClose(Cancel As Boolean)
Application.CommandBars("Tools").FindControl(ID:R2).Enabled = True
Application.CommandBars("Tools").FindControl(ID:0017).Enabled = True
End Sub

Comme cela, l'utilisateur n'aura même plus droit d'utiliser la commande
Outils-Macro
La commande sera complètement bloqué.


Starwing




Avatar
Jacky
:-))))

JJ

"FxM" a écrit dans le message de
news:Op%
Bonsoir,

... et bien le noter quelque part car la Ferrari est pleine.

@+
FxM



Bonjour,

ALT + F11
Va dans Outilis - Propriétés de VBAProject - Protection - verrouillé le
projet pour l'affichage et inscrit un mot de passe

Starwing






Avatar
AV
Je suis désolé, après avoir écrit la première réponse, j'ai constaté que le
résultat ne donnerait rien.


Mais si, mais si....
Il faut enregistrer > fermer et réouvrir pour que la protection du code soit
activée !

AV

Avatar
Starwing
Merci AV!

Je n'étais donc pas dans le champ...

;-))
"AV" a écrit dans le message de news:

Je suis désolé, après avoir écrit la première réponse, j'ai constaté que
le


résultat ne donnerait rien.


Mais si, mais si....
Il faut enregistrer > fermer et réouvrir pour que la protection du code
soit

activée !

AV