I change the target.address but nothing happens..any suggestions?

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$C$10" Then
If Target.Address = "Input" Then
Sheets("Income Statement").Range("E10").Value = Sheets("Income Statement").Range("F9").Value
Sheets("Income Statement").Range("F10").Value = Sheets("Income Statement").Range("F9").Value
Sheets("Income Statement").Range("G10").Value = Sheets("Income Statement").Range("G9").Value
Sheets("Income Statement").Range("H10").Value = Sheets("Income Statement").Range("H9").Value
Range("E10:I10").NumberFormat = "$#,##0"
End If
If Target.Address = "$ Growth from Previous Year" Then
Sheets("Income Statement").Range("E10") = "na"
Sheets("Income Statement").Range("F10").Value = Sheets("Income Statement").Range("F9") - Sheets("Income Statement").Range("E9").Value
Sheets("Income Statement").Range("G10").Value = Sheets("Income Statement").Range("G9") - Sheets("Income Statement").Range("F9").Value
Sheets("Income Statement").Range("H10").Value = Sheets("Income Statement").Range("H9") - Sheets("Income Statement").Range("G9").Value
Range("E10:I10").NumberFormat = "$#,##0"
End If
If Target.Address = "% Change from Previous Year" Then
Sheets("Income Statement").Range("E10") = "na"
Sheets("Income Statement").Range("F10").Value = (Sheets("Income Statement").Range("F9") - Sheets("Income Statement").Range("E9")) / Sheets("Income Statement").Range("E9").Value
Sheets("Income Statement").Range("G10").Value = (Sheets("Income Statement").Range("G9") - Sheets("Income Statement").Range("F9")) / Sheets("Income Statement").Range("F9").Value
Sheets("Income Statement").Range("H10").Value = (Sheets("Income Statement").Range("H9") - Sheets("Income Statement").Range("G9")) / Sheets("Income Statement").Range("G9").Value
Range("E10:I10").NumberFormat = "#.#0%"
End If
End If
End Sub