Как автоматически перейти к следующей ячейке после ввода данных в Excel?

В этой статье я расскажу о способах автоматического перемещения курсора к следующей ячейке для ввода последовательных чисел без нажатия клавиши Enter в Excel.

Автоматический переход к следующей правой ячейке после ввода 4-значного числа без нажатия клавиши Enter с помощью VBA.

Автозаполнение 4-значной последовательности с помощью Kutools для Excel.

Автоматический переход к следующей правой ячейке после ввода 4-значного числа без нажатия клавиши Enter с помощью VBA.

Вот код VBA, который поможет вам автоматически переходить к следующей правой ячейке после ввода 4-значного числа, не нажимая клавишу Enter.

1. Нажмите комбинацию клавиш Alt + F11, чтобы открыть окно Microsoft Visual Basic for Applications.

2. Щелкните Вставить > Модуль и вставьте приведенный ниже код VBA в скрипт Модуля. См. скриншот:

VBA: Автоматический переход к следующей правой ячейке после ввода 4-значного числа.

Sub FourCharEntry1()
'UpdatebyExtendoffice20160614
    Dim xStr As String
    Dim I As Integer
    Dim K As Integer
    xStr = Application.InputBox("Enter string", "Kutools for Excel", , , , , , 2)
    K = 0
    Application.ScreenUpdating = False
    For I = 1 To Len(xStr) Step 4
        ActiveCell.Offset(0, K) = "'" & Mid(xStr, I, 4)
        K = K + 1
    Next
    Application.ScreenUpdating = True
End Sub

3. Нажмите клавишу F5 для запуска кода, и появится диалоговое окно Kutools для Excel , в котором вы можете ввести последовательные номера без каких-либо разделителей. См. скриншот:

4. Нажмите OK. Теперь каждые 4 цифры будут размещены в одной ячейке слева направо.

Совет: Если вы хотите ввести 5-значное, 6-значное число… в ячейку, вы можете изменить 4 на 5, 6 или другое значение в коде.

Автозаполнение 4-значной последовательности с помощью Kutools для Excel.

С помощью Kutools для Excel – удобного инструмента, вы можете автозаполнять последовательные номера в диапазоне без нажатия клавиши Enter с помощью утилиты Вставить номер последовательности.

После бесплатной установки Kutools для Excel выполните следующие действия:

1. Выберите столбец или строку, которую хотите заполнить последовательностью, и нажмите Kutools > Вставить > Вставить номер последовательности. См. скриншот:

2. В диалоговом окне Вставить номер последовательности щелкните Новый , чтобы расширить диалоговое окно. См. скриншот:

3. Затем укажите последовательность по вашему усмотрению. См. скриншот:

4. Нажмите Добавить > Заполнить диапазони выбранный диапазон будет автоматически заполнен последовательными числами.

Совет: С помощью утилиты Вставить номер последовательности вы также можете вставлять повторяющиеся последовательности. Установите флажок Конечное число в диалоговом окне, введите нужное конечное число в правое текстовое поле, и тогда последовательные числа будут заполняться повторно каждые 10 чисел. См. скриншот: