Code to move to cell A after data entered into cell E?

[mmartinez13]

What code do I need so I can move to cell A after I enter data into cell E?

Thanks in advance for your help.

 

[lenze]

In the Worksheet module

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Count > 1 Then Exit Sub
If Target.Column <> 5 Then Exit Sub
Cells(Target.Row + 1, 1).Select
End Sub

lenze

 

[mmartinez13]

Lenze:

Works beautifully. Thanks.

 

[Scott Huish]

I think you only need to check for column 5, but i did add a check to make sure you are not at the last row:

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 5 Then
    If Target.Row + 1 <> Rows.Count Then Target.Offset(1, -4).Select
End If
End Sub