Prrobleme avec Collection Names

Fermé
BoneroPross Messages postés 27 Date d'inscription samedi 16 janvier 2010 Statut Membre Dernière intervention 21 mars 2011 - 28 févr. 2010 à 10:13
Bonjour les gars,
Je veux ecrire une petite routine qui parcourt la collection Names de mon classeur actif et affiche ensuite leur nom.
Le probleme est que quand je declare la variable MesNoms comme Names tout se passe bien. Mais si je la declare comme Collection ma routine beugue. Names est pourtant une collection !!!

Aidez moi svp a comprendre ce qui ne marche.

Thanks in advance.
jutilise excel 2003 avec une vista.
voici mon code:

Sub CollectionNames()

'quelqu 'un peut_il m'expliquer pourquoi quand je declare MesNoms comme une Collection, ma procedure ne marche pas?

Dim MesNoms As Names 'ca marche si je declare comme Names!!

'Dim MesNoms As Collection 'mais si je declare comme une collection ca ne marche plus.!!
Dim i As Name
Dim k As Integer

Set MesNoms = application.activeworkbook.Names
Debug.Print TypeName(MesNoms)
Dim Num As Integer
Num = MesNoms.Count
Debug.Print Num

For k = 1 To Num
Debug.Print MesNoms(k).Name
Next k
End Sub