fifi

[fifi]

bonsoir le forum,
juste 2 questions rapides et sans difficultés 😉

- comment on renomme les modules en VB?
- Comment supprimer des modules vide..(ex : dans lesquel il n'y a pas macro sub...)

merci

 

[andré]

Salut fifi,

Pourrais-tu reposer ta question sous un fil avec un sujet explicite ?

Mets-toi à la place de celui qui voudrait poser la même question d'ici quelques temps, comment veux-tu qu'il retrouve la réponse qu'on va te donner sur base de ton sujet ?

Je t'en remercie.
+

 

[Eric C]

Bonjour le forum
Bonjour fifi (Attention au titre de ta question qui est ton pseudo...)

Pour renommer un module, tu vas sous VBE (Alt F11). Tu doubles cliques sur ton module et tu vas dans la fénêtre propriétés (F4). Là, tu vas dans la propriété Name et tu changes en ce que tu désires.

Pour supprimer un module vide, tu fais un clic droit dessus puis supprimer sans sauvegarde.

Bonne soirée à toutes & à tous 😉

Oups Bonsoir très cher Ândré -

Message édité par: Eric C, à: 01/09/2005 19:24

 

[fifi]

oups dsl
j'ai vu que je me suis trompé et ensuite j'ai oubllié de corriger...faut pas faire 2 hose à la fois.

encore désolé et merci pour ces réponses.
pour la question concernant la suppression des modules ?? j'aurai préféré une solution automatisée...j'en ai 200 à supprimer 😱

merci encore

 

[MichelXld]

bonjour Fifi , André et Eric

cette procedure permet de supprimer les modules vides dans le classeur actif


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

Message édité par: michelxld, à: 01/09/2005 19:42

 

[fifi]

merci..on peut presque faire le café avec Excel.
B)