Sub Macro2()
Range("copyme").Copy Workbooks(Range("Named_Range_1")).Sheets("sheet1").Range(Range("Named_Range_2"))

Note - This depends on the worksheet being called "sheet1" in all cases
End Sub