Transfer formula for data entered on one column to another tab/column

I am getting a syntax error...
I put,
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 1 Then

If Right(Cells(Target.Row, Target.Column) = "FCRA Approved" Then
Call MoveRow(Target.Row)

End If

End If
End Sub