End of rows in a column
 

I would like to know how to find the Row # of the last non-empty cell in a
column.

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.