XL 2010 Dimensionnement Array [RESOLU]

[cathodique]

Bonsoir,

Option Explicit
Sub test()
Dim a As Variant
    With Sheets("bd").Range("A5").CurrentRegion
        a = Application.Index(.Value, Evaluate("row(1:" & _
            .Rows.Count & ")"), Array(2, 1, 5, 9, 8, 6, 7, 12))
    End With
   
    Dim T(1 To UBound(a, 1), 1 To UBound(a, 2))
End Sub

J'ai voulu créer un tableau T dont les dimensions sont celles de l'array 'a', mais le code plante sur la 2ème dimension, je n'ai vraiment pas compris pourquoi la 1ère dimension passe et non la seconde.

Merci de m'éclairer erreur rencontrée en image

Merci beaucoup.

Bon week-end à toutes et à tous.

 

[cathodique]

Merci beaucoup Nicole,

J'ai compris, on déclare puis on redimensionne.
Hier, c'était des fois, maintenant je deviens bigleux plus souvent.

Bon week-end.