Module et module de classe vides

[Yvon]

Bonjour à tous

Dans l'explorateur VBA, j'ai une rafale de modules et de modules de classe qui sont vides de toutes macros peut on les supprimer sans risques pour faire de la visibilité?

Merci de votre réponse

bonne journée
a++
Yvon

 

[PascalXLD]

Bonjour

Oui sans problème (s'ils sont bien vides )

 

[MichelXld]

bonjour Yvon , bonjour Pascal

un exemple par macro , pour supprimer les modules standards vides

Sub supprimerTousModulesVides()
Dim vbComp As Object
Dim i As Long, j As Long

For Each vbComp In ActiveWorkbook.VBProject.VBComponents
If vbComp.Type = 1 Then
i = vbComp.CodeModule.CountOfDeclarationLines + 1
j = vbComp.CodeModule.CountOfLines
If j < i Then ActiveWorkbook.VBProject.VBComponents.Remove vbComp
End If
Next
End Sub



bonne soiree
MichelXld

 

[Yvon]

Merci à tous les deux de vos réponses, Michel peut tu m'expliquer l'intéret de les supprimés via une macro,......

Bonne soirée

a++
Yvon

 

[MichelXld]

rebonsoir

pour les supprimer en une seule fois et de façon automatisée...


bonne soiree
MichelXld

 

[Yvon]

Ok j'achète le concept, cela me plait bien finalement..

Merci beaucoup
a++
Yvon