How To Get Last Row in Excel VBA code

There are many programmatic way to find last row of data input, but the simplest is....

Dim LastRow 
LastRow = ws.Range("A1").End(xlDown).Row