Prüfen, ob Combobox aufgeklappt ist
Martin
ich habe zwei kurze Frage zur ComboBox. Kann abgefragt werden, ob eine ComboBox "aufgeklappt" ist? Gibt es auch eine Möglichkeit eine "aufgeklappte" ComboBox mit VBA wieder "einzuklappen"?
Folgender Code ist für das KeyDown-Ereignis einer ComboBox hinterlegt:
Private Sub ComboBox4_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)
If KeyCode = 13 Then 'Enter-Taste
CommandButton1_Click
ElseIf KeyCode = 38 Or KeyCode = 40 Then 'Pfeiltasten hoch/runter
ComboBox4.DropDown
End If
End Sub
Für Antworten bin ich - wie immer - sehr dankbar!
Viele osterliche Grüße
Martin
Anzeige