Necesito obtener la fila de una activecell

Amadeo,

prueba una de estas:

Sheets("NombreDeTuHoja").UsedRange.Rows.Count
esto funcionara correctamente siempre y cuando las filas q estan por debajo
o por encima de la tabla no tengan ningunos valores, formatos (color,
bordes, formato condicional), comentarios, validacion, etc.

o

si sabes cual es la primera fila (y es constante) podrias hacer esto:

FilaInicial=2
FilaFinal=Sheets("NombreDeTuHoja").Cells(Rows.Count, 1).End(xlUp).Row
NumeroFilas=FilaFinal-FilaInicial

Saludos,
KL
(XL 97, 2000, 2002)

Ojo - mi separador de argumentos en las formulas es la coma ",".
Puede q necesites cambiarla por punto y coma ";".

Para usar mi direccion de correo electronico privada
borra "NOSPAM" y "PLEASE" antes de usarla.

"Amadeo Govoni" wrote in message
news:

Estimado grupo

Tengo una tabla de n filas variables

Necesito saber si hay una sentencia para saber cuantas filas tiene una
tabla

podria hacer con un Do - Loop

Pero si tengo 8000 filas va a tardar un poco...

Siempre empieza de la fila 11

Espero vuestra ayuda

felicidades

amadeo

Hola Amadeo:

Yo utilizo el siguiente código:

ActiveCell.CurrentRegion.Rows.Count

Saludos,

B.M.

Bart,

El metodo CurrentRegion es bueno si estamos seguros de q la tabla no
contiene filas y/o columnas (o partes de ellas) vacias, de lo contrario el
resultado podria ser incorrecto.

Ademas ActiveCell es una referencia un poco inestable ?no? Creo q seria
mejor usar la primera celda de la tabla, p.ej.:

Range("A1").CurrentRegion.Rows.Count

Saludos,
KL
(XL 97, 2000, 2002)

Para usar mi direccion de correo electronico privada
borra "NOSPAM" y "PLEASE" antes de usarla.

"Bart" wrote in message
news:

Hola Amadeo:

Yo utilizo el siguiente codigo:

ActiveCell.CurrentRegion.Rows.Count

Saludos,

B.M.

Gracias por lel dato
saludos
amadeo
"KL" escribió en el mensaje
news:

Amadeo,

prueba una de estas:

Sheets("NombreDeTuHoja").UsedRange.Rows.Count
esto funcionara correctamente siempre y cuando las filas q estan por
debajo o por encima de la tabla no tengan ningunos valores, formatos
(color, bordes, formato condicional), comentarios, validacion, etc.

o

si sabes cual es la primera fila (y es constante) podrias hacer esto:

FilaInicial=2
FilaFinal=Sheets("NombreDeTuHoja").Cells(Rows.Count, 1).End(xlUp).Row
NumeroFilas=FilaFinal-FilaInicial

Saludos,
KL
(XL 97, 2000, 2002)

Ojo - mi separador de argumentos en las formulas es la coma ",".
Puede q necesites cambiarla por punto y coma ";".

Para usar mi direccion de correo electronico privada
borra "NOSPAM" y "PLEASE" antes de usarla.

"Amadeo Govoni" wrote in message
news:

Estimado grupo

Tengo una tabla de n filas variables

Necesito saber si hay una sentencia para saber cuantas filas tiene una
tabla

podria hacer con un Do - Loop

Pero si tengo 8000 filas va a tardar un poco...

Siempre empieza de la fila 11

Espero vuestra ayuda

felicidades

amadeo

"Amadeo Govoni" escribió en el mensaje news:

Gracias por lel dato
saludos
amadeo

Una posibilidad más, suponiendo que "por debajo" de la tabla no haya nada:

MsgBox [NombreDeLaHoja!A1].SpecialCells(xlLastCell).Row

Un saludo.


Fernando Arroyo
MS MVP - Excel