Suponiendo este array de 10 elementos:
Código:
mi_array = Array("A", "B", "C", "D", "e", "F", "G", "H", "I", "J")
Para saber cuantos elementos hay, te basta con llamar a UBound y sumarle 1, pues los elementos del vector empiezan a contar desde 0 (en el ejemplo: 0,1,2,3,4,5,6,7,8,9).
Por tanto:
Código:
Range("A1") = UBound(mi_array) + 1
Te devuelve en la celda A1, el dato que buscas, en este caso: 10
En este otro caso:
Código:
Range("A2") = mi_array(0)
Te devolvería como resultado en A2: A
Salu2