Effacer des macro par VBA
Résolu
yao.chris
Messages postés
92
Date d'inscription
Statut
Membre
Dernière intervention
-
yao.chris Messages postés 92 Date d'inscription Statut Membre Dernière intervention -
yao.chris Messages postés 92 Date d'inscription Statut Membre Dernière intervention -
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
A voir également:
- Effacer des macro par VBA
- Telecharger macro convertir chiffre en lettre excel - Télécharger - Tableur
- Effacer iphone - Guide
- Effacer les données de navigation sur android - Guide
- Jitbit macro recorder - Télécharger - Confidentialité
- Comment recuperer des messages effacés sur whatsapp - Guide
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
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