Copy and Paste rows

[kapilrakh]

Hi,

I want to copy and paste row in sheet 3 to the row in sheet 1.
Since the row no is a variable, i m having difficulty in writing the right formula.
Please help.

Please Login or Register  to view this content.

Above code doesn't work

[mojo249]

Hi Kapilrakh

Try this:

Please Login or Register  to view this content.

[kapilrakh]

Hey mojo,

Thanks for your reply. But your code copies the values cell wise instead of the entire row. It take a lot of time plus I will have to repeat this code for every column. Please put the code to copy and paste entire row. The row no is a variable

[mojo249]

To copy a row instead of the cell substitute

Cells(varRowSource, 1).Select and Cells(varRowTarget, 1).Select

for

Row(varRowSource).Select and Row(varRowTarget).Select