Discussion :

[CGANE]

Bonjour,

J'ai utilisé le code proposé par "SilkyRoad" à savoir

Code :

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

1
2
3
4
5
6
7
8
9
10
'Supprimer la macro nommée "MaMacro" dans le "module3"
Sub supprimerUneMacroPrecise()
Dim Debut As Integer, Lignes As Integer
 
    With ThisWorkbook.VBProject.VBComponents("Module3").CodeModule
        Debut = .ProcStartLine("MaMacro", 0)
        Lignes = .ProcCountLines("MaMacro", 0)
        .DeleteLines Debut, Lignes
    End With
End Sub

Toutefois j'ai un message d'erreur au passage de l'instruction
<.DeleteLines Debut, Lignes> :

"Impossible d'entrer en Mode Arrêt maintenant"

Que je fasse Continuer ou Fin, la macro s'arrête bien qu'il y ai d'autres instructions à venir.
Par contre l'instruction est bien prise en compte. Ma macro est supprimée.

Quelqu'un peut-il me dire comment faire pour que l'exécution du programme se poursuive ?
Merci par avance

[fring]

Bonjour &

Je viens de tester le code et aucun message d'erreur, tout se passe correctement. Tu as bien une macro dans le Module3 qui se nomme "MaMacro" ?

[CGANE]

Bonjour,

Oui la macro existe bien, d'autant qu'elle est correctement supprimée par le code.
Le message d'erreur vient juste après le passage de l'instruction
.DeleteLines Debut, Lignes
qui a elle bien été prise en compte.

Je viens toutefois de tester ce même code mais en supprimant une macro qui se trouve sur un AUTRE classeur EXCEL et ça fonctionne correctement.

L'anomalie vient donc du fait que j'essaye de supprimer une macro qui se trouve sur le même "Projet" que la macro appelante ! (même si le module est différent). d'où le message de "point d'arrêt" !

Peut-être existe t-il une instruction qui permette de modifier un projet tout en y faisant référence

Merci pour ton test.

[fring]

Non je t'assure, tout se passe correctement, je viens de refaire le test un mettant ce code dans le module3 en question et il me supprime bien toutes les lignes de la macro Sub MaMacro() sans message d'erreur.

Je te met en pièce jointe mon fichier de test, tu pourras constater qu'au départ j'ai une macro nommée MaMacro, imbriquée entre d'autres macros dans le module 3 et que celle-ci sera correctement supprimée. Cela te permettra de comparer les deux fichiers et de trouver peut-être d'où vient l'erreur

Pièce jointe 30160

[CGANE]

Bonjour,

J'ai lancé la macro telle que à partir de ton fichier et chez moi ca ne fonctionne pas ! Etrange ...

Je te fais suivre ce dernier dans lequel j'ai rajouté des copies d'écran avec le message d'erreur correspondant .

[fring]

Désolé, cela dépasse mais compétences, cela provient peut-être d'un paramètre ou une option coché chez moi et pas chez toi (ou l'inverse), de la version d'Excel (E2000 pour ma part)...j'en sais trop rien. Etrange comme tu dis, je suis curieux d'en connaître la raison.
Espérons que quelqu'un soit plus inspiré.