En reprenant le code de zazaraignée et avec une petite modif, ça donne:

Dim monTableau() As Integer
Dim i As Integer ' compteur et indice
ReDim monTableau(0)
For i = 0 To 9
ReDim...