Shortest Code for finding last row via VBA

[nbrcrunch]

I'm wondering why the following doesn't seem to be encouraged on ANY Excel site I've ever seen. I've seen lots of code for determining the last row but this is the shortest. Is it error prone?

Sub Macro3()

Selection.SpecialCells(xlCellTypeLastCell).Select
TheLastRow = ActiveCell.Row
MsgBox (TheLastRow)

End Sub

 

[Richard in Redditch]

Would using the statement "Application volatile" before the line which gets the last row solve the non updating after the deleting of rows?

 

[MARK858]

No, if you are using usedrange the only reliable way of resetting it is to close and reopen the workbook.
Quite often referring to the usedrange will reset it but I have known that to fail.
Application.volatile has nothing to do with the usedrange.
The Cells.Find method is the most reliable for me if looking for the last row with data on a sheet or Columns.Find for multiple columns.

 

[jproffer]

I don't think so. That has to do with telling functions (especially UDFs) to recalculate when ANYTHING in the worksheet is changed as opposed to (non-volatile) only when one of it's parent or child cells is changed. Has nothing (that I'm aware of) to do with code or updating what a line of code might evaluate.

 

[Richard in Redditch]

Dear Mark858 and JProffer

Many thanks for your fast emails. I did hope that my idea would work, but heigh ho.

Thanks again folks!

 

[MARK858]

Deleted as reacted to a very old post on my phone