nom de tableau contenu dans un autre tableau

Version imprimable

04/06/2010, 19h28
alainb

nom de tableau contenu dans un autre tableau

Bonsoir,
Dans une variable tableau(), j'enregistre des noms de tableau.
Exemple

Code:

tableau(x,y)="message"

J'aimerais utiliser cette variable sous la forme

Code:

tableau(x,y)(num_ligne, num_colonne)

pour

Code:

message(num_ligne, num_colonne)

J'ai testé ces lignes sans résultat
Alain
04/06/2010, 20h13
Didier Gonard

Bonjour,

vois ici si c'est ce dont tu parles :koi:

cordialement,

Didier

Citation:

Envoyé par Ormonth

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
Option Explicit
Option Base 1
Public Sub lesArrayCestPasSiSimple()
    '
    Dim myArray() As Variant
    ' tableau à une dimension: résultat ok
    myArray = Array("toto", "tata", "titi", "tutu")
    Range("A1:D1") = myArray
    ' tableau de tableau à une dimension: résultat ok.
    myArray = Array(Array("toto", "tata", "titi", "tutu"), Array("ello", "ella", "elli", "ellu"))
    Range("A5:D5") = myArray(1)
    Range("A6:D6") = myArray(2)
End Sub

Ce code ressemble effectivement à ce que je recherche. Par contre, si je souhaite lire un champ du tableau, le code suivant me retourne une erreur ou rien

Code:

myArray = Array(Array(1), Array(1))

Alain

Citation:

Ce code ressemble effectivement à ce que je recherche. Par contre, si je souhaite lire un champ du tableau, le code suivant me retourne une erreur ou rien
Code :

Code:

myArray = Array(Array(1), Array(1))

Ta syntaxe est l'écriture d'une fonction Array pour créer une variable tableau, pas celle d'une écriture de la lecture d'une donnée d'une variable tableau.

Les variables tableau sont assez simple d'emploi, mais moins à conceptualiser, la lecture des tutoriels et de l'aide vba sur le sujet seront un gain de temps précieux, car tu en passeras beaucoup plus à tâtonner.
Ton souci est typique d'un problème de compréhension, bien normal lorsqu'on n'a pas l'habitude de manier les tableaux.

vois ces tutoriels :

Conceptualisation des variables tableau en VBA et Application à l'optimisation du code sous Excel

Utiliser les variables tableaux en VBA Excel

et un focus ici : http://silkyroad.developpez.com/vba/tableaux/#LVI

Paradoxalement, ni l'un, ni l'autre ne traitent des variables tableau de tableaux, hors c'est ce dont il s'agit dans ton cas. Il faut d'abord maîtriser les bases des variables tableau simples, pour passer à cette étape qui est alors très logique dans son écriture.

Lance le code suivant avec F5, vois le résultat et continue avec F5...
Code:

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 Public Sub lesArrayCestPasSiSimple2() Dim myArray() As Variant 'Si tu écris ceci : myArray = Array(Array(1), Array(1)) 'pour lire les données, il faut écrire cela : MsgBox myArray(1)(1) MsgBox myArray(2)(1) Stop 'Si tu écris comme ceci, c'est moins ambigu : myArray = Array(Array(1), Array(77)) 'pour lire les données, il faut écrire cela : MsgBox myArray(1)(1) MsgBox myArray(2)(1) Stop 'Si tu écris comme cela, ça devient clair : myArray = Array(Array(1, "toto", 3), Array(77, 9, "plouf")) 'pour lire les données, il faut écrire cela : 'on lit : Dans la case 1 de MyArray, je veux la première case du tableau sous-jacent etc.. ' le nom du tableau sous-jacent est en fait myArray(1) MsgBox myArray(1)(1) MsgBox myArray(1)(2) MsgBox myArray(1)(3) MsgBox myArray(2)(1) ' le nom du tableau sous-jacent est en fait myArray(2) 'on lit : Dans la case 2 de MyArray, je veux la deuxième case du tableau sous-jacent etc.. MsgBox myArray(2)(2) MsgBox myArray(2)(3) 'Attention : My array est bien un tableau à 1 dimension ! End Sub
cordialement,

Didier

je pense qu'il faut que tu prenne l'exemple plutot dans ce sens

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
Public Sub lesArrayCestPasSiSimple()
    '
    Dim myArray() As Variant
    Dim myT() As Variant
    Dim myE() As Variant
 
    ' tableau de tableau à une dimension: résultat ok.
    myT = Array("toto", "tata", "titi", "tutu")
    myE = Array("ello", "ella", "elli", "ellu")
 
    myArray = Array(myT, myE)
 
    Range("A5:D5") = myArray(1)
    Range("A6:D6") = myArray(2)
End Sub

09/06/2010, 21h36
alainb

Citation:

Envoyé par Ormonth

Ta syntaxe est l'écriture d'une fonction Array pour créer une variable tableau, pas celle d'une écriture de la lecture d'une donnée d'une variable tableau.

Les variables tableau sont assez simple d'emploi, mais moins à conceptualiser, la lecture des tutoriels et de l'aide vba sur le sujet seront un gain de temps précieux, car tu en passeras beaucoup plus à tâtonner.
Ton souci est typique d'un problème de compréhension, bien normal lorsqu'on n'a pas l'habitude de manier les tableaux.
cordialement,
Didier

Merci Didier et zyhack
Je n'avais pas suivi les conseils du site : FAQ, tutoriels and Co.
Avec tous vos renseignements je n'ai plus de raison valable de poursuivre cette discussion et je vais bosser mes bases !
Bonne continuation
Alain