How to Copy a full Row from a Worksheet to the front of a column

Hi Gurus

I'm working on a VBA code that organizes and matchs data from two diferent excels, and produces a new document with the data.

To Match the data, I want to keep the full row of document A, and in front of the last column of this document I Want to insert the match from document B.

I've managed to copy the data from both documents, to diferent sheets of the new document and i can make the data match in "Sheet1", but i cant copy to the place i want.

I've Tried something like

Please Login or Register  to view this content.

The Thing is, instead of pasting the row in front of the pretended column, it substitutes the row from "Sheet1" with the result from the "Sheet2". I think its because I'm using the "EntireRow" Function on this line

Please Login or Register  to view this content.

I've tried using range, but nothing seems to work.



Below an example of the expected result

Sheet1

Product | Component | Description
A | 10 | Thank
B | 20 | You


Sheet2

Product | Price | Time to produce
A | 10 | 10h
B | 20 | 20h


Expected Result

Product | Component | Description | Product | Price | Time to produce
A | 10 | Thank | A | 10 | 10h
B | 20 | You | B | 20 | 20h


Please help!

Best regards and Thanks in Advance

Please add code tags to your VBA code.
You can edit your first post.

-
AA CodeTags.jpg