keuze lijst tonen bij focus

Status
Niet open voor verdere reacties.
I

impulsief

Gebruiker
Lid geworden
10 dec 2017
Berichten
46
Hallo

Code: 
Private Sub Tekst233_GotFocus()
Application.RunCommand acCmdShowDatePicker
End Sub

is het mogelijk een keuze lijst te tonen bij focus net zoals een kalender te tonen is bij focus zoals de code hierboven

groet,
peter
 
Een keuzelijst (met invoervak, daar praat je vermoed ik over) kent het .DropDown event. Daarmee wordt de keuzelijst gelijk geopend. Er zijn een paar ingangsmogelijkheden:
Code: 
Private Sub Keuzelijst1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
    Me.Keuzelijst1.Dropdown
End Sub
of
Code: 
Private Sub Keuzelijst1_GotFocus()
    If Not Me.AllowEdits = False Then Me.Keuzelijst1.Dropdown
End Sub
Als er een dynamische query achter de keuzelijst hangt, kun je nog een Select Case gebruiken om af te vangen wat er moet gebeuren als de query niks oplevert (dan mag de keuzelijst worden overgeslagen, dus niks openklappen), één waarde (dan gelijk de waarde kiezen) of meerdere waarden (automatisch uitklappen).
 
Status
Niet open voor verdere reacties.
Steun Ons

Nieuwste berichten

Terug
Bovenaan Onderaan