Comment créer une collection dans Excel ?

Résolu/Fermé
gyom75 - 29 janv. 2012 à 16:18
 gyom75 - 29 janv. 2012 à 18:18
Bonjour,

Je n'arrive pas bien à comprendre l'aide dans VBA, qqn peut-il m'aider ? voici mon besoin :
je voudrais écrire une boucle
For each Onglet in ListeOnglets
msgbox onglet
next

mon problème : je ne sais pas créer la collection Listeonglets.
j'ai commencé par écrire
dim Onglet as string
dim ListeOnglets as collection
puis
ListeOnglets.add item:="Feuil1"
mais ça ne veut pas... et là, je coince !

merci de votre aide
A voir également:

2 réponses

michel_m Messages postés 16603 Date d'inscription lundi 12 septembre 2005 Statut Contributeur Dernière intervention 16 décembre 2023 3 311
Modifié par michel_m le 29/01/2012 à 17:24
bonjor
Dim ListeOnglets as New Collection

les éléments de ta collection sont l'item et key élément unique
ListeOnglets.add item:="Feuil1" ,key:=cstr(cptr)
cptr étant le compteur incrémenté par tes soins à chaque ajout d'un item

a la fin ne pas oublier
set listeonglets=nothing

Michel
0
merci !
0