Discussion :

[niro75]

Bonjour,

Je debute en VB et je voudrais créer une collection avec comme key, la ligne de mon fichier excel.

Alors pour le moemnt je fais :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
key = Cells(Ligne, PARAMETERNAMECOLUMN).Row
...
paramValues.Add Item:=valeur, key:=key

Mais, il n'en veux pas, comment faire?

Merci, de votre aide.

[Megaxel]

Premièrement, je ne comprend pas la différence entre tes variables "Ligne" et "key".
Deuxièmement, je ne crois pas qu'on puisse "numéroter" les éléments d'une collection comme ça, mais je ne suis pas sûr de moi du tout. Pourquoi n'utilises-tu pas un simple tableau, dans lequel les éléments sont repérés par leur numéro?

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
 
MonTableau(0) = 14
MonTableau(1) = 5
MonTableau(2) = 12
...

[niro75]

En fait je souhaite recuperer des donnees de mon classeur vers une collection (parce que je connais la facon dont on y accede) pour, apres action, les sortir dans un fichier texte.
Mais je ne sais pas comment utiliser le tableau en vb. J'ai regarder la faq, mais ce n'est pas bien clair,

Si jamais tu avais la bonte de me dire comment ça s'utilise, ce serait super.

[Megaxel]

Y'a pas plus simple, tu le déclares comme ça:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
Dim MonTableau(10) As String

Là, par exemple, tu réserves 11 places (de 0 à 10) pour y mettre des chaîne de caractères. Tu peux bien sûr choisir la taille, et y mettre tous les types de données.
Et tu accèdes aux éléments, en lecture comme en écriture, comme ça:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
 
MonTableau(4) = "Taratata"
MsgBox(MonTableau(4))

[Xo]

Pour mémo, tu peux utiliser une collection, voici un exemple de syntaxe :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
    Dim paramValues As New Collection
    Dim valeur(2) As String
    Dim cle(2) As String
 
    valeur(0) = "Visual"
    valeur(1) = "Basic"
    valeur(2) = "6.0"
 
    cle(0) = "0"
    cle(1) = "1"
    cle(2) = "2"
 
    For i = 0 To 2
        paramValues.Add valeur(i), cle(i)
    Next i
 
    For i = 0 To 2
        'Attention, l'index d'une collection démarre à 1
        Debug.Print paramValues.Item(i + 1)
    Next i

En général, je préfère les tableaux aussi ...

[HPJ]

Bonjour,

Je debute en VB et je voudrais créer une collection avec comme key, la ligne de mon fichier excel.

Alors pour le moemnt je fais :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
key = Cells(Ligne, PARAMETERNAMECOLUMN).Row
...
paramValues.Add Item:=valeur, key:=key

Mais, il n'en veux pas, comment faire?

Merci, de votre aide.

C'est normal qu'il n'en veuille pas...
Cells.Rows est un entier.
Si la clé d'un élément d'une collection était un entier tu ne pourrais pas l'utiliser car maCollection(3) aurait un double sens: est-ce le troisième élement de ta collection ou bien l'élément qui a la valeur 3 pour clé ?
C'est pour ça que la clé d'un élément d'une collection doit commencer par une lettre pour lever l'ambiguité entre index et clé.