How to Add Item to Combo Box and requery

[jmuirman1]

I created a combo box [combo1468] with values from a table "ASSIGNOR-UNDERWRITING LIST" . works great.



i want to add a new item to the list and be able to choose that item from the combo box without closing and opening the main form

i created an add new item form and tried to requery. I get a "run-time error '2465'Microsoft can't find(the combo box field.

the code i used is:

Private Sub Form_Close()

Forms!assignorlistF!Combo1468.Requery


End Sub

can anyone help?

combo box Row Source
SELECT [ASSIGNOR-UNDERWRITING COMPANY LIST].[assignorID], [ASSIGNOR-UNDERWRITING COMPANY LIST].[Underwriting Company], [ASSIGNOR-UNDERWRITING COMPANY LIST].[Parent Carrier], [ASSIGNOR-UNDERWRITING COMPANY LIST].[Domiciliary Address], [ASSIGNOR-UNDERWRITING COMPANY LIST].[State], [ASSIGNOR-UNDERWRITING COMPANY LIST].[Tax ID] FROM [ASSIGNOR-UNDERWRITING COMPANY LIST] ORDER BY [Underwriting Company];

thanks,

John

[ranman256]

Run an append query to add the item to the combo source table.
then refresh the combo to get the new values. (done on the form with the combo)

docmd.openquery "qaAddNewVal"
cboBox.requery

if not in the form with combo, then use the full path:
forms!fMyForm!cboBox.requery

[Gicu]

Or you might want to look at the NotInList event of the combo:
https://docs.microsoft.com/en-us/off...obox.notinlist
Cheers,

[mike60smart]

Hi John

The Not In List Event is the way to go with this.