如何修复编译错误：预期End Sub？

I am trying to create a macro that when a line of information is added to one of my sheets, it will automatically add that line of data to a different sheet (in the same workbook). I have researched extensively online and found this code which I think does what I want it to, after I tweaked it a little:I am trying to create a macro that when a line