A
aa
How to add value to value list of unbound combo box automatically when exit
from the unbound combo box
Thank you for your help and answer
from the unbound combo box
Thank you for your help and answer
You are using an out of date browser. It may not display this or other websites correctly.
You should upgrade or use an alternative browser.
You should upgrade or use an alternative browser.
J
John Vinson
How to add value to value list of unbound combo box automatically when exit
from the unbound combo box
Thank you for your help and answer
Use VBA code in the combo's NotInList event, such as:
Private Sub combobox_NotInList(NewData as String, Response as Integer)
Dim iAns As Integer
iAns = MsgBox(NewData & " is not in the list. Add it?", vbYesNo)
If iAns = vbYes Then
' Add the new value
Me!combobox.RowSource = Me!combobox.RowSource & ";" & NewData
Response = acDataErrAdded
Else
' undo the selection
Me!combobox.Undo
Response = acDataErrContinue
End If
End Sub