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.
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
1 respuesta más de otro experto
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.