Bueno, puedes ocupar un arreglo dinámico
Código:
Dim MiArreglo()
longitud = 5
For i = 0 to 5
Redim Preserve MiArreglo(i) = i
Next
El error te lo está mandando porque de seguro estás tratando de dimensionar un arreglo de acuerdo al valor de una variable
Código:
y = 5
Dim MiArreglo(y)
De esta manera, la forma apropiada es
Dim MiArreglo()
y = 5
Redim MiArreglo(y)
Salu2,