Dropdownlijst uitbreiden

[jelleruben]

Hallo allemaal,

Is het ook mogelijk om bij een dropdownlijst uit tebreiden?

ik bedoel dan niet in de tabel, maar als een medewerker gegevens
invoerd, en de keuze staat niet in het dropdown menu, dat deze
medewerker, hem gewoon wel in kan voeren. En opslaan

Als men dat nu doet, dan krijg men de melding
"De tekst die u hebt ingevoerd, is geen item in de lijst."

Ik dacht dat ik de eigenschap "Alleen Lijst" op nee kon zetten.
Maar dan krijg ik de melding
"Kan de eigenschapp Alleen nu niet op Nee instellen"

Ik moet een eigenschap van ColumWidth aanpassen. Maar waar doe ik dit? en moet ik dit aanpassen, voor mijn gewenste resultaat?

 

[OctaFish]

Ja, dat kan. Dat gebeurt bij de gebeurtenis <Bij niet in lijst>. De instelling <Alleen Lijst> moet op Ja staan. Voorbeeldje uit de Help met een keuzelijst die cboKleur heet:

Private Sub cboKleur_NotInList(NewData As String, Response As Integer)
Dim ctl As Control
    
    Set ctl = Me.cboKleur
    If MsgBox("Kleur staat niet in de lijst. Toevoegen?", vbOKCancel) = vbOK Then
        Response = acDataErrAdded
        ctl.RowSource = ctl.RowSource & ";" & NewData
    Else
        Response = acDataErrContinue
        ctl.Undo
    End If
End Sub

 

[jelleruben]

Bij welke optie moet deze komen te staan? bedoel dus
Bij klikken of bij wijzigen enzo.

 

[OctaFish]

De actie moet staan bij de gebeurtenis <Bij niet in lijst> (NotInList). (En dat had ik ook al gezegd )

 

[jelleruben]

Als ik naar de eigenschappen kijk, dan heb ik een tabblad gebeurtenissen. met daar onder wanneer het moet plaats vinden (dit is in het formulier ontwerpweergave)

 

[OctaFish]

Eigenschappen zijn voor alle objecten anders. Als je het formulier actief hebt, zie je andere eigenschappen als bij een tekstvak of keuzelijst. Je moet die dus wel geselecteerd hebben. Eventueel kun je het eigenschappen openen door te dubbelklikken op de keuzelijst, dan weet je zeker dat je het juiste object hebt.