Изменить фокус в ячейке EXCEL

Question

Что мне нужно изменить, чтобы, когда я нажимаю, например, A5, фокус должен быть изменен на B3, поэтому, когда я нажимаю B5, фокус должен переходить на C3 и так далее ...

Итак, мой код прямо сейчас:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
  If Not Application.Intersect(Range("A5:D5"), Target) Is Nothing Then
    Range("A3").Select
  End If
End Sub

Поэтому, когда я выбираю строку 5 от A до D, точка перемещается в A3 ... вместо A3, я хотел бы перейти к следующему столбцу в строке 3.

Спасибо

Answer 1

Может быть:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
  If Not Application.Intersect(Range("A5:D5"), Target) Is Nothing Then
  Application.EnableEvents = False
      Target.Offset(-2, 1).Select
   Application.EnableEvents = True
  End If
End Sub