adding values to unbound combobox

  • Thread starter Thread starter Guest
  • Start date Start date
G

Guest

Hello,
I have an unbound form and an unbound combobox on this form.
This combobox has these settings:
RowSourceType=â€value listâ€
RowSource= [nothing. This property has been left blank]
LimitToList=yes

On the NotInListEvent I have this code:
-------
Dim w As String
w = UCase(NewData)
If MsgBox("E' stato indicato un valore non compreso nell'elenco." + vbCrLf +
"Aggiungendolo all'elenco questo valore sara' disponibile anche per i
prossimi inserimenti." + vbCrLf + _
"Si vuole inserire il valore all'elenco?", vbYesNo, "Valore non in elenco")
= vbYes Then
VVspecialisticheWhich.AddItem (w)
End If
Response = acDataErrAdded
------
I would like to have users to enter values in the combobox and these values
to be retained once the form closed to be available when it will be re-opened
again for next entering.
What happens instead is that while the form is opened any values entered is
available in the combobox list. But when the form is closed they are kind of
deleted because once I reopen the form the combobox list is blank.

Any suggestion?
Thanks,
Nick
 
I'm no expert but I think your only option is to create a simple table. When
you receive the imput add it to the combo box and the table. On loading the
form read the table and put into the combo box.
 
Back
Top