Syntaxe de la fonction Array

Bonjour,


Je fait les tableaux avec la fonction Array(), comme ci-dessous.
Avec un tableau à 2 dimensions, l'affectation à la plage ne donne
pas de bons résultats, j'ai une suite de #N/A.

Pourtant, la fenêtre des variables locales montre que le tableau est bien construit.
Une explication?

Code:

---

1 2 3 4 5 6 7 8 9 10 11

Public Sub lesArrayCestSimple() ' Dim myArray() As Variant ' tableau à une dimension: résultat ok myArray = Array("toto", "tata", "titi", "tutu") Range("A1:D1") = myArray ' tableauà 2 dimension: résultat non ok. myArray = Array(Array("toto", "tata", "titi", "tutu"), Array("ello", "ella", "elli", "ellu")) Range("A1:E2") = myArray End Sub

---

Bonjour,

A partir d’un code pris dans ce tutoriel, tu as construit une chose plus complexe qui n’est d’ailleurs pas abordée car hors sujet dans ce tutoriel.

Il s’agit de tableau de tableau ou de tableau en escalier, donc le tableau que tu as créé est bien un tableau à une dimension qui a pour éléments… des tableaux à une dimension, comme te le montrait d’ailleurs bien ta fenêtre variable locale.

Il faut bien en inspecter la notation :

Myarray(1)(1) se traduit ainsi : Myarray(1) est le nom de ton tableau et le (1) qui suit son index de tableau à une dimension.

D’où le résultat obtenu sur la feuille avec le code modifié ainsi :

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

---

cordialement,

Didier