VBA : Target.Value, change the cell

Question

I would like to click on E15 and put the value from E16. How can I do that ? My code is :

Private Sub Worksheet_Change(ByVal Target As Range)
Dim i As Integer