VBA до go до следующей пустой ячейки в диапазоне

Question

Хорошо, вот что мне нужно помочь.

Когда я завершаю запись в ячейке столбца X, она переходит к следующей пустой ячейке столбца E.

Так что, если я завершу ввод X6, она затем переходит к строке 7 столбца E. Мне также нужно это происходит каждый раз, поэтому, если Cell X7 завершается, то он переходит к E8, X8, затем переходит к E9 и т. д.

Вот код VBA, который мне удалось выяснить, но я не думаю, что это работает на то, что мне нужно.

Sub MOVETO()
'
' MOVETO Macro
'

'
    ActiveWindow.ScrollColumn = 10
    ActiveWindow.ScrollColumn = 9
    ActiveWindow.ScrollColumn = 8
    ActiveWindow.ScrollColumn = 7
    ActiveWindow.ScrollColumn = 6
    ActiveWindow.ScrollColumn = 5
    Range("E7").Select
End Sub

Answer 1

Вы можете использовать этот код:

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 24 Then
    Target.Offset(1, -19).Select
End If
End Sub

Вы не можете вставить его в обычный модуль, но в объекте, например, Sheet1 в VBA

Answer 2

Нашел ответ откуда-то еще, и это сработало, как я и предполагал.

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
  If Target.CountLarge > 1 Then Exit Sub
  If Target.Column > 24 Then Cells(Target.Row + 1, "E").Select
End Sub