I have a form with a combo box and a button . In the property sheet of each there is an event procedure, After Update for the combo box and On Click for the button. In both cases I get the error message that is:
The expression After Update you entered as the event property setting produced the following error: A problem occurred while Microsoft Access was communicating with the OLE server or ActiveX Control.
When I click on Show Help, I get the following explanation:
This error occurs when an event has failed to run because the location of the logic for the event cannot be evaluated. For example, if the OnOpen property of a form is set to =[Field], this error occurs because a macro or event name is expected to run when the event occurs.
As an example, the combo box is Combo27. The code it is supposed to go to is:
Private Sub Combo27_AfterUpdate()
' Find the record that matches the control.
Dim rs As Object
Set rs = Me.Recordset.Clone
rs.FindFirst "[LNFN] = '" & Me![Combo27] & "'"
If Not rs.EOF Then Me.Bookmark = rs.Bookmark
End Sub
As the error suggests, when I put a breakpoint on the first line, it never gets there.
This is a new project I just started yesterday. The code above is copied from an older project that works.
Thanks for your help.
Richard