End of rows in a column
'Last row filled in Column A
lngLastRow = ActiveSheet.Cells(Rows.Count, "A").End(xlUp).Row
'Last col filled in Row1
lngLastCol = ActiveSheet.Cells(1, Columns.Count).End(xlToLeft).Column
If this post helps click Yes
---------------
Jacob Skaria
"Philosophaie" wrote:
I would like to know how to find the Row # of the last non-empty cell in a
column.
|