ComboBox bei Tab-Sprung öffnen
19.12.2006 18:38:42
Andreas
Ich habe mir mit Hilfe von Text- und ComboBoxen eine Art Eingabemaske erstellt. Mit diesem Code (Danke an dieses Forum) springe ich per Tabtaste von Box zu Box.
Gib es eine Möglichkeit, dass sich beim Sprung in eine ComboBox diese öffnet, damit man einen Eintrag wählen kann?
Private Sub TextBox1_KeyDown(ByVal KeyCode As _
MSForms.ReturnInteger, ByVal Shift As Integer)
If KeyCode = vbKeyTab Then ComboBox1.Activate
End Sub
Private Sub ComboBox1_KeyDown(ByVal KeyCode As _
MSForms.ReturnInteger, ByVal Shift As Integer)
If KeyCode = vbKeyTab Then TextBox2.Activate
End Sub
Danke für die Hilfe!
mfg Andreas