Поместить курсор в текстовое поле c

Question

Я являюсь волонтером для вспомогательного медицинского учреждения, в котором работает «Шкаф ссуды» с более чем 800 наименованиями. Инвалидные коляски, ходунки, переносные скамейки и др. c. Люди в беде могут одолжить эти вещи бесплатно. Я разработал пользовательскую форму, чтобы упростить ввод данных. Он имеет 12 текстовых полей, последовательно пронумерованных от 1 до 12. Остановки табуляции нумеруются аналогично. Пользователь вводит идентификационный номер элемента и. Затем VBA находит элемент и заполняет все остальные поля. Как только это закончится, я sh курсор, чтобы попасть в textbox4. Это не так. Независимо от того, что я делаю, он попадает в текстовое поле 3.

Private Sub TextBox1_AfterUpdate()
'Find the record
    Dim i As Integer, X As Integer

    For i = 2 To Application.WorksheetFunction.CountA(Sheet1.Range("A:A"))
    For X = 2 To 12
    If Sheet1.Cells(i, "A").Text = Me.TextBox1.Text Then
    Me("Textbox" & X).Text = Sheet1.Cells(i, X).Text
    End If
    Next X
    Next i
    TextBox4.SetFocus
End Sub