Hi

One way

Sub Lastcellused()
Dim lRow as Long, lCol as Long
ActiveSheet.UsedRange
With Cells.SpecialCells(xlCellTypeLastCell)
lRow = .row
lCol = .Column
End With
End Sub
--
Regards

Roger Govier


"Sonnich" wrote in message
ups.com...
Hi!

How do I get the "last" used (max x and y) cell of my sheet?

how do I set it?

BR
Sonnich