Définir une looongue suite de points

[alf_ze_cat]

Bonjour,

 

je tatonne, je tatonne ...

et je me demande si on pas faire plus court que ca :

Dim pt1(0 To 2) As Double
   Dim pt2(0 To 2) As Double
   Dim pt3(0 To 2) As Double
   Dim pt4(0 To 2) As Double
               (....)
   Dim pt50(0 To 2) As Double
   Dim pt51(0 To 2) As Double
   Dim pt52(0 To 2) As Double
   Dim pt53 0 To 2) As Double
   Dim pt54(0 To 2) As Double

 

un truc du style :

 

for i=1 to 50
dim pt(i)(0 to 2) as double
next

 

mais on peut pas ...

Une idée s'vous plait ... ?

[Maxence DELANNOY]

Essaye de définir ton tableau comme ça :

 

Dim pts(1 To 50, 0 To 2) As Double

[alf_ze_cat]

ah ben oui, tout simplement

merci