Effacer des macro par VBA
Résolu
yao.chris
Messages postés
95
Statut
Membre
-
yao.chris Messages postés 95 Statut Membre -
yao.chris Messages postés 95 Statut Membre -
Bonjour,
connaissez vous le moyen de créer une macro permettent d'effacer des modules, des userforms, code de thisworkbook et code feuille ?
J'ai essayé les codes trouvés sur le net mais aucun ne fonctionnent.
Merci pour votre aide.
yao
connaissez vous le moyen de créer une macro permettent d'effacer des modules, des userforms, code de thisworkbook et code feuille ?
J'ai essayé les codes trouvés sur le net mais aucun ne fonctionnent.
Merci pour votre aide.
yao
2 réponses
-
-
Bonjour Polux,
J'ai essayé mais le reçois l'erreur 1004.
J'ai entré le code ci-dessous mais le débogage me renvoi à la ligne (With ActiveWorkbook.VBProject).
Je ne comprend pas !!!
Sub Supprimer_toutes_macros()
Dim VBC As Object
With ActiveWorkbook.VBProject
For Each VBC In .VBComponents
If VBC.Type = 100 Then
With VBC.CodeModule
.DeleteLines 1, .CountOfLines
.CodePane.Window.Close
End With
Else
.VBComponents.Remove VBC
End If
Next VBC
End With
End Sub
Merci pour votre aide.
yao
