Copy a range and paste in another column to the last row of data

[Amit Srivastava]

Hi

I want copy a data range in column G starting with cell reference G2 to the last row, the last row of the data goes to say 1000 rows and I want to paste the copied range in column J starting with cell reference J2. now my question is if next time the number of rows increases the code will only run till 1000 rows and will not go beyond that. is there a way to copy and value paste the same till the last row of data


any help is much appreciated

Regards,
Amit

 

[FormR]

Hi, here is one way:

Range("G2:G" & Range("G" & Rows.Count).End(xlUp).Row).Copy Destination:=Range("J2")

 

[My Aswer Is This]

Try this:

Sub Copy_Range()
Range("G2:G" & Cells(Rows.Count, "G").End(xlUp).Row).Copy Range("J2")
End Sub

 

[Amit Srivastava]

thanks will update you after using the code

 

[Amit Srivastava]

thanks

 

[My Aswer Is This]

Glad we were able to help you. Come back here to Mr. Excel next time you need additional assistance.

thanks