How to determine next tabstop in VBA UserForm?

Question

I have a UserForm with some textbox entry fields on it that are enabled/disabled by a checkbox. When a checkbox is clicked to check it, I'd like to move the focus into the now-enabled textbox.

The textbox is the next control after the checkbox in the tab order, so it seems like using the tab order to find the appropriate textbox would be a good idea.

But... how can I find the next control in the tab order after a given control? Is there a method to do that, or do I have to enumerate all the controls and figure it out for myself?

Answer 1

As a different way of looking at this.

Can you not rather use the textbox you want focussed, and set that name in the checkbox.tag

then in you vba code use

DoCmd.GoToControl CheckBox.Tag

Where the CheckBox.Tag is the Textbox.Name?

EDIT:

OK, I found this

SendKeys "{Enter}", True

at VBA code for moving to next control? It must be eeeasy

Answer 2

I appreciate that this comes under the heading of "enumerating all the controls" but it's pretty simple and I attach the code for completeness:

Private Sub CheckBox1_Click()
Dim ctl As Control
For Each ctl In Me.Controls
    If ctl.TabIndex = Me.ActiveControl.TabIndex + 1 Then
        ctl.SetFocus
        Exit For
    End If
Next

End Sub