Private Sub Worksheet_Change(ByVal Target As Range)
If Application.Intersect(Range("C5"), Target) Is Nothing Then Exit Sub
Application.EnableEvents = False
Target(5, 3).Select 'move to E9 from C5
Application.EnableEvents = True
End Sub