Discussion :

[abouhossam]

bjr
est ce qu'il est possible d'avoir un macro1 dont le but est de supprimer un macro2
merci.

[fring]

Bonjour,

Le but est de supprimer une seule macro bien précise ou de supprimer toutes les macros ?

[Abed_H]

Bonsoir
Cette procédure supprime tous les modules "Standard", "De Classe" Formulaire" et tout le code qui peut y avoir dans le ThisWorkbook ou dans les feuilles module.

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
Sub SupprimeToutCodeEtFormulaire()
	Dim VBComp As Object
	Dim VBComps As Object
	Set VBComps = ActiveWorkbook.VBProject.VBComponents
	For Each VBComp In VBComps
	    Select Case VBComp.Type
	        Case 100
	            With VBComp.CodeModule
	                .DeleteLines 1, .CountOfLines
	            End With
	    Case Else
	        VBComps.Remove VBComp
	    End Select
	Next VBComp
	End Sub

Bonne soirée

Abed_H

[abouhossam]

bjr
mon but est de supprimer des macro bien précises.
merci.

[fring]

Alors tu dois au moins connaître le nom du module et le nom de la macro, tu trouveras toutes les infos nécessaire ICI