Compare two sheets and copy/paste value from sheet1 to sheet2

Hello dear people,

I hope someone can help me with the following problem. I dont have an idea how to write this macro:

Compare the last filled row in column1 of sheet1 (green) with the equal value in column1 of sheet2 (green). If values are the same, copy everything under the result (columnA:columnC) from Sheet2 (red) and paste it into Sheet1 (red). This is because Sheet2 updates every time I open it and to edit the new values I have to copy them to Sheet1. That should be done with the macro.

I've included an example and I hope it makes sense.

Many thanks in advance

Best regards
valuca

Hi
Try this

Please Login or Register  to view this content.

A VBA demonstration as a beginner starter :

PHP Code: 

Sub Demo1()
        Dim Rc As Range
        Set Rc = Sheets("Table1").Cells(Rows.Count, 1).End(xlUp)
    With [Table2!A1].CurrentRegion.Rows
        V = Application.Match(Rc, .Columns(1), 0)
        If IsNumeric(V) Then If V < .Count Then .Item(V + 1 & ":" & .Count).Copy Rc(2)
    End With
        Set Rc = Nothing
End Sub 


► Do you like it ? ► ► So thanks to click on bottom left star icon ? ★ Add Reputation ? ! ◄ ◄