Foro de Ayuda Excel

eddo · #1 23/10/08, 18:02:17

como identifico la cantidad de elementos que contienen un array?

ST_ · #2 23/10/08, 22:41:40

a ver esto:

Código:

Sub Matriz_ST()
Dim Matriz_ST As Variant
titulo = "Aviso de " & Application.UserName

Matriz_ST = Array("Ioyama", "eddo", "Antonio", "efmc", "neverdelimon1", "ST")
    dato = UBound(Matriz_ST)
        MsgBox "El ultimo dato es el nº " & dato & _
        " que corresponde a " & Matriz_ST(dato), 64, titulo
End Sub

eddo · #3 19/11/08, 16:31:35

el problema es que a mi array ya le defino la dimension antes con redim y la funcion ubound() entrega el mayor indice y no el numero de elementos existe otra funcion??

ST_ · #4 19/11/08, 17:31:44

Cita:

Empezado por eddo

el problema es que a mi array ya le defino la dimension antes con redim y la funcion ubound() entrega el mayor indice y no el numero de elementos existe otra funcion??

que no es lo mismo ?????????????????????

aver ......si yo cambio el mesaje por: (obviamente el resto de la macro la conservo tal cual)
MsgBox "El número de elementos de esta matriz es " & dato, 64, titulo

no te arroja el dato deseado

Yenay · #5 19/11/08, 18:25:22

Vale, creo que la pregunta se refiere a que la matriz se ha declarado con una dimensión X (la que sea) y luego la va rellenando, pero puede tener términos vacíos. Y lo que quiere contar son los elementos no vacíos.

si es así...

¿Has probado a recorrer el array con un for-next y un contador que cuente los términos no vacíos?

eddo · #6 20/11/08, 01:22:37

claro la idea era recorrer un array por ejemplo digamos que de capacidad 10 algo asi como redim array(9) luego lo relleno con 5 elementos (eso es dinamico) y necesito alguna funcion que me devuelva que hay 5 elemento tonces recorro hasta 5 no mas y no hasta las 10 posicionesdonde no hay datos . claro que se puede hacer con un for y contar los no vacios y luego otro for para recorre hasta el conador pero la idea era optmizar y usar una funcion predefinida de excel vba para ya iba enfocada la pregunta lamento no haberme expresado bien saludos a los integrantes que respondieron mis dudas bye

Herramientas
Mostrar Versión Imprimible Enviar por Correo
Desplegado
Mode Lineal Cambiar a Modo Hibrido Cambiar a Modo Hilado