По Enter из TextBox перейти на CommandButton

[GWolf]

Доброго времени суток, уважаемые коллеги!

Обычно, стараюсь обходится без UserForm, но не в этот раз. И вот получил проблему: На UserForm есть поле TextBox, и после ввода в него данный, пользователь, обычно, нажимает Enter. При этом должна срабатывать кнопка CommandButton, которая отвечает за закрытие формы и разноску введенных данных в поля таблицы. При клике мышкой все работает, а вот как при Enter передать фокус кнопке - не соображу. SetFokus в событии TextBox BeforeAfter не работает.
Помогите, пожалуйста!
Всем спасибо!

[Pelena]

Здравствуйте.
Примерчик бы не помешал)
Можно так попробовать

Код Выделить Развернуть

Private Sub TextBox1_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)
    If KeyCode = vbKeyReturn Then CommandButton1_Click
End Sub

[Serge 007]

Здравствуйте

...как при Enter передать фокус кнопке?..

Почему не TabIndex (см. вложение)?

[GWolf]

Доброго дня, друзья!
Спасибо всем откликнувшимся! Я честно запамятовал про TabIndex. Спасибо, Сергей, что напомнили.
Оба примера развития событий утащил в норку.