Help to copy value data if conditions are meet - This's new thread

[sbv1986]

Hi all

My workbook have 04 sheets("data_new, data_old, higher, lower).
Now I want to have code to do that:

with sheets("data_old")
 y =21 to lastcolumn
 r = 3 to lastrow
End with

with sheet(higher) or sheets(lower)
x = 2 to lastrow
if .cells(x,"B").value = sheets("data_old").cells(2, y) and .cells(x,"A").value = sheets("data_old").cells(r, "C") then
   .cells(x,"D").value = sheets("data_old").cells(r, y).value

Please see with my workbook attachments file