Discussion :

[ghostvb]

Bonjour,

Je voudrais supprimer un module de macro dans Excel après son exécution en utilisant vbscript.

Dans les cours vbaexcel de developpez.com j'ai trouvé le code suivant qui fonctionne parfaitement:

Code :

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

ActiveWorkbook.VBProject.VBComponents.Remove ActiveWorkbook.VBProject.VBComponents("Module1")

que je ne parviens pas à transformer en vbscript

Merci pour votre aide

[ghostvb]

Je suis content d'avoir trouvé la solution, donc pour les personnes qui pourraient être intéressées :

Pour créer un module

Code :

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

Set mdle = wb.VBProject.VBComponents.Add(1)

Avec "(1)" le nom du module sera "module1" donc à adapter.


Pour supprimer le module

Code :

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

wb.VBProject.VBComponents.Remove mdle

Merci à tous

[SfJ5Rpw8]

question .... je suis toujours dubitatif devant de telle pratique ... cela sert a quoi de créer une "macro" par du code ... surtout si c'est pour la détruire ensuite ???

[ghostvb]

Bonjour bbil,

Lorsque l'on travaille avec plusieurs centaines d'utilisateurs de tous niveaux, il est parfois préférable de supprimer des macros pour éviter tout bidouillage, fausse manipulation ou autre, d'autant plus lorsque certains traitements ne doivent s'effectuer que de manière contrôlée (entre autre).

[SfJ5Rpw8]

Bonjour Bibil,

Lorsque l'on travaille avec plusieurs centaines d'utilisateurs de tous niveaux, il est parfois préférable de supprimer des macros pour éviter tout bidouillage, fausse manipulation ou autre, d'autant plus lorsque certains traitements ne doivent s'effectuer que de manière contrôlée (entre autre).

suffit de pas créer la macro dans le classeur contenant tes données comme cela tu n'as pas à la détruire

[ghostvb]

C'est comme cela quand on débute en programmation, sans formation, et que l'on pratique quand on a 5 minutes par-ci par-là, on n'est loin d'avoir les bons réflexes.................................................

Mais ça viendra,............je ne désespère pas, bien au contraire