Here's what I'm doing - I have a series of queries that run to give me a unique number in text format. I would like that number to go into my ID field after I update the CustomerID. The CustomerID is a combobox. Is this possible? Here is the code I have to just run the query after the CustomerID is updated?
Private Sub Combo6_AfterUpdate()
On Error GoTo Err_Command8_Click
Dim stDocName As String
stDocName = "qry-RMAIDTEST2"
DoCmd.OpenQuery stDocName, acNormal, acEdit
Exit_Command8_Click:
Exit Sub
Err_Command8_Click:
MsgBox Err.Description
Resume Exit_Command8_Click
End Sub
Private Sub Combo6_AfterUpdate()
On Error GoTo Err_Command8_Click
Dim stDocName As String
stDocName = "qry-RMAIDTEST2"
DoCmd.OpenQuery stDocName, acNormal, acEdit
Exit_Command8_Click:
Exit Sub
Err_Command8_Click:
MsgBox Err.Description
Resume Exit_Command8_Click
End Sub