macro suppression module

MichelXld à dit:

bonsoir Germain

tu peux tester


Sub supprimerModule()
With ActiveWorkbook.VBProject.VBComponents
.Remove .Item('Module1')
End With
End Sub



bonne soiree
MichelXld

Cliquez pour agrandir...

ROGER2327 à dit:

Bonjour à tous.

VB:

Sub supprimerModule()
With Application.VBE.ActiveVBProject.VBComponents: .Remove .Item("Module1"): End With
End Sub

Bonne journée.


ℝOGER2327
#7287

Lundi 9 Palotin 141 (Saints Boleslas et Ladislas, polonais - fête Suprême Quarte)
9 Floréal An CCXXII, 5,9332h - hyacinthe
2014-W18-1T14:14:23Z

Cliquez pour agrandir...

Broch002 à dit:

Bonjour, à copier dans un module

VB:

Sub AutoDestruct()
    Call removeModule("Module1", ThisWorkbook.Name)
End Sub

Bonne soirée

Cliquez pour agrandir...