VBProjects sous Excel 2000
Bonjours à tous et j'espère que vous avez passé un bon Noël.
J'ai une toute petite question de rien du tout.
Dans les temps ancien (Oct 2005) j'ai eu une discussion avec, entre autre, Ouskel'n'or sur la possibilité de décompter les feuilles de calcul, dont voici le code :
Code:
Workbooks("toto.xls").Application.VBE.VBProjects(i).vbComponents(j).Name
Ma remarque tient sur "VBProjects(i)" Peut-on créer plusieurs projets sur un même classeur et si oui comment fait-on?
Si non alors que dois-je faire pour pouvoir décompter les feuilles de mon classeur
Mon projet parle de reprendre sur chaque feuille de mon classeur (87) lire la cellules A1 et mettre le contenu de cette cellule sur une feuille récap puis faire la somme.
Merci pour votre aide :wink:
Igloobel
Re: VBProjects sous Excel 2000
Merci %)
Citation:
Envoyé par Igloobel
Dans les temps ancien (Oct 2005) j'ai eu une discussion avec, entre autre,
Ouskel'n'or sur la possibilité de décompter les feuilles de calcul, dont voici le code :
Code:
Workbooks("toto.xls").Application.VBE.VBProjects(i).vbComponents(j).Name
Ce code permet d'accéder à la collection de tous les objects Excel dont les feuilles de calcul -
VBProjects fait référence à la collection de tous les projects VBA.
Code:
1
2
3
| For Each sh In Workbooks("toto.xls").Worksheets
Debug.Print sh.Name
Next |
est plus approprié.
