PDA

View Full Version : [SOLVED:] Next empty Range (Row)



Justinlabenne
12-04-2004, 12:46 AM
Is there any way to select the last filled range of cells?

I can select the last filled row by column, (Range("A65536").End(xlUp).Select)
but how do I get it to extend to Col B, and C?

I want to be able to copy last filled row in Col A:C without having to select them individually like i do now:


Range("A65536").End(xlUp).Copy
Range("B65536").End(xlUp).Copy
Range("C65536").End(xlUp).Copy

Any ideas?

Jacob Hilderbrand
12-04-2004, 01:33 AM
Something like this may work for you. We can check Col A for the last row and use that to make our range.

LastRow = Range("A65536").End(xlUp).Row
Range("A" & LastRow & ":C" & LastRow).Copy

Justinlabenne
12-04-2004, 01:39 AM
That's exactly what I needed, I had problems on how to configure selecting the range, beautiful, you have improved my ability to write code tenfold. Thanks Jacob, also read about your promotion: Congrat's

Jacob Hilderbrand
12-04-2004, 02:44 AM
You're Welcome :)

Take Care