Locating end of coloumn to add more data
 

I'm transferring data from different sheets to one summary sheet.

I want to add at the bottom of the list. How can I find the range position
(it would be row in my case) so I can start my counter to that value ?

tia

Locating end of coloumn to add more data
 

Try something like the following:

Dim LastRow As Long
LastRow = ActiveSheet.Cells(Rows.Count, "A").End(xlUp).Row + 1
Debug.Print LastRow


Change the "A" to whatever column is relevant.


--
Cordially,
Chip Pearson
Microsoft MVP - Excel
Pearson Software Consulting, LLC
www.cpearson.com



"Junkyard Engineer" wrote in
message ...
I'm transferring data from different sheets to one summary
sheet.

I want to add at the bottom of the list. How can I find the
range position (it would be row in my case) so I can start my
counter to that value ?

tia