Private Sub Worksheet_Change(ByVal Target As Excel.Range)
If Target.Address = Range('I2').Address Then
Target.Offset(0, 3).Activate
ElseIf Target.Address = Range('L2').Address Then
Target.Offset(0, 4).Activate
ElseIf Target.Offset(0, 1) Then
End If
End Sub