effacement d'une macro

[fofo]

Est il possible d’écrire des lignes de commandes en VBA qui puissent s’effacer une fois exécutées ou bien est il possible de programmer l’effacement d’une macro a partir d’une autre…

Merci d’avance

 

[Anne]

J'ai trouvé un truc mais il y a peut-être (sans doute) mieux.

Tu repères à quelle ligne commence et fini ta macro et tu mets la ligne suivante dans une autre :

Application.VBE.ActiveCodePane.CodeModule.DeleteLines 1, 4

Exemple : dans ton Module1 il y a ça :

Sub Macro1 ()

End Sub
Sub Supprime_Macro1 ()
Application.VBE.ActiveCodePane.CodeModule.DeleteLines 1, 3
End Sub

A la fin il va donc te rester :

Sub Supprime_Macro1 ()
Application.VBE.ActiveCodePane.CodeModule.DeleteLines 1, 3
End Sub


Mais il ya sans doute un moyen de repérer où commence et où fini ta ligne de macro. Je n'ai pas eu le temps mais fouille du coté de "Application.VBE.ActiveCodePane.CodeModule" dans l'aide pour voir tout ce qui est possible.

Bon courage

Anne

 

[fofo]

Merci pour ton aide précieuse, ANNE, je te teindrai au courant si je trouve mieux A+