Automatically changing a Lookup field when data is entered

[June7]

The error does indicate Access can't find something that is referenced, probably a misspelling of query or field.

[WayneSteenkamp]

Lol, yeah found the problem
there was a space in the word.

All working now

Thanks

[WayneSteenkamp]

Just a quick question.
Everything seems to be working perfectly at the moment. Just going over things now.
In the ASE form. when I apply an unassigned Sim to a Unit (the status stays as Unassigned- though when you close and open the form, the status updates and changes). Is there a way to make it "real time"? if not? I'm not complaining - taken ages to get this DB working. So am very Happy

[June7]

Use AfterUpdate event of the SimSerialNumber textbox with code: Me.Refresh

[WayneSteenkamp]

Hi June.
I've done some alterations to the database you were helping me with a month ago. Added a few fields in the BackEnd tables with minor adjustment to the Front End. I think they have worked, just testing it now and I added the code in your previous post "Me.Refresh"

The problem I'm getting now is when I add a new record and add data: i.e ASEID number, SimSerialNumber, then as soon as I tab to go to the next field "IMEINUMBER". An error comes up saying "You must enter a value in the ASE_Units.Location" field.
Press Debug and the "Me.Refresh" word is highlighted. Would the Me.refresh need to go in the beforeupdate?

Private Sub SimSerialNumber_AfterUpdate()
Me.Refresh
End Sub

Private Sub SimSerialNumber_BeforeUpdate(Cancel As Integer)
If Me.SimSerialNumber & "" <> "" Then
If IsNull(DLookup("SimSerialNumber", "Sim_Serials", "SimSerialNumber='" & Me.SimSerialNumber & "'")) Then
If MsgBox("This SIM is not in database. Do you want to add?", vbYesNo) = vbYes Then
CurrentDb.Execute "INSERT INTO Sim_Serials(SimSerialNumber) VALUES('" & Me.SimSerialNumber & "')"
Else
Cancel = True
Me.SimSerialNumber.Undo
End If
End If
End If
End Sub

[June7]

I no longer have your project and if you have made changes it probably wouldn't be relevant anyway. Want to provide latest version?

[WayneSteenkamp]

In the ASE Units form, The Sim status only updates when you close the form and reopen it. Would like it to be real time if possible.

[June7]

The Location field in table is set as Required Yes. That is causing the error message when the Refresh is run.

Try the Me.Refresh in the AfterUpdate event of the SimSerialNumber textbox.