Ultima celda usada(LastCell) en el Rango (1)

'Buscar la ultima celda usada(LastCell) en el Rango I

Sub Excel_Macro_ultim_cell_antes_de_una_celdaEnblanco()
'Mediante esta macro se podra seleccionar mediante codigo vba la ultima celda
'usada en la columna antes de una celda en blanco

'como se observa en la imagen del Excel se ha seleccionado la celda
'E5 que es justo la celda antes de la primera celda vacia (E6)
'con este parametro (xlDown) buscara la celda con direccion hacia abajo

Range("E1").End(xlDown).Select


End Sub





Sub Excel_Macro_LastCellInColumn()
'mediante esta macro podra seleccionar la ultima celda usada
'E10 tal como se aprecia en la imagen

Range("E65536").End(xlUp).Select

End Sub


Sub Excel_Macro_Ultiam_celda_antes_deBlanco()
'mediante esta macro podra realizar la busqueda de
'la ultima celda usada antes de una celda en blanco
'pero esta vez con direccion a la derecha (xlToRight) de su celda inicial

Range("A2").End(xlToRight).Select

End Sub

Sub UltimaCeldaUsada()
'Con esta macro se puede hallar la ultima celda usada
'en la Hoja

ActiveSheet.Cells.SpecialCells(xlCellTypeLastCell).Select

End Sub