Move cursor to next field 'onchange' etc.. (1 Viewer)

[Winkypop]

I have 4 drop down lists calling values from a query.
This part works as expected.

However, I would like the focus to automatically change to the next drop down field after ANY (valid) entry is made.

IE

Drop Down 1: "any value" ----> focus automatically set to Drop Down 2, etc

The code I have only relates to 1 of the drop down values, I want it to rerlate to any of the values.

*************
Private Sub Question1_AfterUpdate()

If Me.Question1 = "Yes" Then
Me.Question2.SetFocus
End If
End Sub
*************

My values are simple, just "yes" "no" "I don't know", etc.

OR

If this cannot be done with drop downs, how about with field lists?

 

[RichO]

Very simply...

Private Sub Question1_AfterUpdate()
Me.Question2.SetFocus
End Sub

...will set the focus to the next question once a selection is made.

 

[Winkypop]

Very simply...

Private Sub Question1_AfterUpdate()
Me.Question2.SetFocus
End Sub

...will set the focus to the next question once a selection is made.

Again, you save the day....

Have a Cpt Morgan for me !