Try

lastrow = Cells.Find(What:="*", After:=[A1], SearchDirection:=xlPrevious).Row

Mike

"Sherry" wrote:

I am using the following code to find the last row of a worksheet. It works
fine as long as the last used row is unhidden. But it I hide it, then this
does not work as I want. I need to find the absolute last row whether it is
hidden or unhidden.

Can anyone help?

FindLastRow = objSheet.Cells.SpecialCells(xlCellTypeLastCell).Ro w