ComboBox bei Tab-Sprung öffnen

• ComboBox bei Tab-Sprung öffnen von Andreas vom 19.12.2006 18:38:42
• AW: ComboBox bei Tab-Sprung öffnen - von ChrisL am 19.12.2006 18:54:13
  • AW: ComboBox bei Tab-Sprung öffnen - von Andreas am 19.12.2006 19:00:37

Betrifft: ComboBox bei Tab-Sprung öffnen
von: Andreas

Geschrieben am: 19.12.2006 18:38:42
Hallo Excel-Profis!
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

Betrifft: AW: ComboBox bei Tab-Sprung öffnen
von: ChrisL
Geschrieben am: 19.12.2006 18:54:13
Hallo Andreas
Falls Tabelle:

Private Sub ComboBox1_GotFocus()
ComboBox1.DropDown
End Sub

Falls Userform:

Private Sub ComboBox1_Enter()
ComboBox1.DropDown
End Sub

Gruss
Chris

Betrifft: AW: ComboBox bei Tab-Sprung öffnen
von: Andreas
Geschrieben am: 19.12.2006 19:00:37
Hallo Chris!
Danke für die Hilfe, funktioniert super.
mfg Andreas

Excel-Beispiele zum Thema "ComboBox bei Tab-Sprung öffnen"
ComboBox als Symbol	Alle ComboBoxes auf Position 1
Werte in eine ComboBox einer UserForm übernehmen	ComboBox in Abhängigkeit einer 2. ComboBox ein-/ausblenden
ComboBox mit Monatsnamen füllen	Mehrspaltige ComboBox
ComboBox2 in Abhängigkeit von ComboBox1 bestücken	Nur Zellen mit Inhalt in ComboBox listen
Neue UserForm bedingt nach ComboBox-Auswahl aufrufen	Neues Element in ComboBox