néné06
XLDnaute Accro
Bonjour,
En théorie, la propriété VBComponents renvoie la collection des composants contenue dans un projet.
- ThisWorkbook.
- L'ensemble des feuilles (CodeName).
- L'ensemble des modules Standards et modules de Classe.
-Les UserForm.
J'ai donc placé ce code pour lister les composants du classeur actif.
Sub boucledescomposant()
Dim i As Integer
For i = 1 To ActiveWorkbook.VBProject.VBComponents.Count
x = ActiveWorkbook.VBProject.VBComponents(i).Name
Next
End Sub
Mais, lors du lancement, il me place une erreur 1004?
Je suis sous Windows10 et Office 2010!
Quelqu'un aurait il une idée
d'avance merci!!!
René
En théorie, la propriété VBComponents renvoie la collection des composants contenue dans un projet.
- ThisWorkbook.
- L'ensemble des feuilles (CodeName).
- L'ensemble des modules Standards et modules de Classe.
-Les UserForm.
J'ai donc placé ce code pour lister les composants du classeur actif.
Sub boucledescomposant()
Dim i As Integer
For i = 1 To ActiveWorkbook.VBProject.VBComponents.Count
x = ActiveWorkbook.VBProject.VBComponents(i).Name
Next
End Sub
Mais, lors du lancement, il me place une erreur 1004?
Je suis sous Windows10 et Office 2010!
Quelqu'un aurait il une idée
d'avance merci!!!
René