End of rows in a column

P

Philosophaie

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

Jacob Skaria

'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
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads

Column number of last column that returns value ignore formulas 8
copying down a blank column 5
VBA set thick borders around non empty cells in range 0
Search for empty cells and move cells next to 10
Add a new row in Named Table (Table1) and add data from txtboxes into last empty cells based on header named of the Table1 0
find last non empty cell in a column and display value in msgbox 7
Multiple SUM's in a column 15
Loop from left to the right 5

Top