valores valor saber rangos rango otra numero intervalo hacer funcion esta entre edad devolver dentro crear condicionando como celdas celda buscar excel excel-vba

excel - valor - Determine el número de filas en un rango



saber si un numero esta dentro de un rango excel (6)

¿Por qué no usar una fórmula de Excel para determinar las filas? Por ejemplo, si está buscando cuántas celdas contienen datos en la Columna A, use esto:

= COUNTIFS (A: A, "<>")

Puede reemplazar <> con cualquier valor para obtener cuántas filas tienen ese valor.

= COUNTIFS (A: A, "2008")

Esto se puede usar para encontrar celdas llenas en una fila también.

Sé el nombre del rango del comienzo de una lista: 1 columna de ancho y x filas de profundidad.

¿Cómo calculo x ?

Hay más datos en la columna que solo esta lista. Sin embargo, esta lista es contigua: no hay nada en ninguna de las celdas encima o debajo, ni en ninguno de los lados al lado.


Esa última línea funcionó perfectamente @GSerg.

La otra función era en lo que había estado trabajando, pero no me gusta tener que recurrir a UDF a menos que sea absolutamente necesario.

He estado probando una combinación de excel y vba y lo había hecho funcionar, pero es complicado comparado con tu respuesta.

strArea = Sheets("Oper St Report CC").Range("cc_rev").CurrentRegion.Address cc_rev_rows = "=ROWS(" & strArea & ")" Range("cc_rev_count").Formula = cc_rev_rows


Estoy seguro de que probablemente querías la respuesta que dio @GSerg. También hay una función de hoja de cálculo llamada rows que le dará el número de filas.

Entonces, si tiene un rango de datos llamado Data que tiene 7 filas, entonces =ROWS(Data) mostrará 7 en esa celda.


También puedes usar:

Range( RangeName ).end(xlDown).row

para encontrar la última fila con datos que comienzan en su rango con nombre.


Function ListRowCount(ByVal FirstCellName as String) as Long With thisworkbook.Names(FirstCellName).RefersToRange If isempty(.Offset(1,0).value) Then ListRowCount = 1 Else ListRowCount = .End(xlDown).row - .row + 1 End If End With End Function

Pero si está seguro de que no hay nada en la lista, solo este thisworkbook.Names(FirstCellName).RefersToRange.CurrentRegion.rows.count


Sheet1.Range("myrange").Rows.Count