Problema al crear matrices. Ayuda por favor.

davidvalo
27 de Febrero del 2005
Mi intención es crear un número de matrices que viene dado por el valor de la variable NumeroMatrices. Para ello empleo un bucle for en donde la variable contador va aumentando su valor y dando nombre a las matrices que se van creando:


Dim contador as Integer
For contador = 1 To NumeroMatrices

‘Se crean las matrices:
Dim contador (1 To 11, 1 To 15) As Variant
‘Se rellenan las matrices:
contador (1, 1) = “lo que sea”
contador (1, 2) = “lo que sea”
...

Next contador

El problema es que esto no se puede hacer pues se está duplicando la definición de contador. ¿Alguna sugerencia pasa solucionar el problema?. GRACIAS.

en?
27 de Febrero del 2005
davidvalo, en una matriz multidimensional puedes redimensionar la última dimensión. Lo que quieres hacer sería:

Dim Contador() As Variant

ReDim Contador(1 To 11, 1 To 15, 1 To NumeroMatrices)

Y así puedes tener la última dimensión cono el índice de la matriz:

For Cont = 1 to NumeroMatrices
Contador(1, 1, Cont) =
Contador(1, 2, Cont) =

__
Un saludo.