Obtener la ultima celda con datos
Como obtener la ultima fila con datos, dentro de un Rango:
Ejemplo:
Tengo el rango Range("C11:I18") en el cual algunas Celda contienen datos, pero la Celda G18 es la ultima con Datos, como obtener la ultima línea en este caso es la 18, esto en una Macro.
2 Respuestas
This method works like pressing Ctrl+End on your keyboard. When you press Ctrl+End on your keyboard, it will always take you to the last row no matter where you are
Hola Dante
He ejecutado el código recibido, le ingreso un Msgbox Ir y no muestra nada, la idea que el código muestre la ultima línea con datos, como en el ejemplo enviado línea 18.
Dices: "como en el ejemplo".
No pusiste ningún ejemplos.
Podría ser así:
Sub ultimafila()
Dim lr As Long
lr = ActiveSheet.Range("C11:I18").Find("*", , xlValues, , xlByRows, xlPrevious).Row
msgbox lr
End SubTe muestro un ejemplo:
Dante eso es la instrucción que le he agregado (Msgbox Ir) y no muestra ningún Valor
Nota El Código lo estoy haciendo con Excel 2003.
Revisa mi ejemplo. Trata de replicarlo en tu hoja y ejecuta el código.
También sería conveniente si pones tu imagen para que yo pueda revisar tus datos.
Dante.
He cerrado a Excel y lo he abierto de nuevo y funciona tu código.
Gracias por tu ayuda.
Disculpa la demora de mi repuesta pero he tenido fallas con el Internet.
[No te preocupes. Encantado de ayudarte, gra cias por comentar.