disappearing Errors

[RSMonroe]

I wrote a simple Database to keep track of pieced of Art I have made. When the form opens or moves to another record I have two pieces of code which run.

Private Sub CmbSEARCH_Change()


Dim SearchValue As String
Dim rst As DAO.Recordset
SearchValue = Me!CmbSEARCH


Set rst = Me.Recordset.Clone
rst.FindFirst ("[ItemName] = '" & SearchValue & "'")
If Not rst.EOF Then Me.Bookmark = rst.Bookmark

Me!CmbSEARCH = ""

End Sub


Private Sub Form_Current()




If Me!SOLD = True Then
lblSOLD.Visible = True
Else
lblSOLD.Visible = False
End If

End Sub

The following error statement occurs, "The Expression On Change you entered as the event property setting produced the following error: Object or class does not support the set of events." This repeats if I attempt to change to a different record.

If I then view the form in design, go to the On Current on the property sheet, click on the three dots and open the Visual Basic window, DO NOTHING TO IT, go back to the form window, change to the form view and move to a different record thereby run the code THAT I HAVE NOT CHANGED. Everything is fine. No problem, can keep on doing everything I need to do, until the next time I start up Access and open the form. Then I have to do that all over again cause it gives me the same error.

WTF

Anyone have any thoughts?

[Micron]

WTF

That had better be Wednesday, Thursday, Friday or else you might find your posts are lacking in repsponses.
Perhaps state what you want rather than what doesn't work because some of what I see makes no sense.
First, the On Change event does not fire when a form opens:

When the form opens or moves to another record I have two pieces of code which run.

It fires every time you press a key when the control that has code for that event has the focus. This means you're creating a recordset and executing the code with every keystroke.

As far as things seeming to work when flipping between design and form view, that usually means that some part of the code will not result in a setting that is being attempted. The fact that it seems to perform otherwise means that the setting is not crucial to the function being performed. Ignoring errors because something seems to work is risky.
EDIT
Forgot to ask you to post code within code tags (# on forum toolbar).

[CJ_London]

perhaps make use of vba intellisense rather than type what you like and expect vba to understand

Set rst = Me.Recordset.Clone

if you put option explicit at the top of the module (should be at the top of all modules) and compile your code you would find basic errors such as this.

you will also find using the bang as here Me!CmbSEARCH does not use intellisense and will not pick up the sort of basic error.

[Micron]

Ajax, good catch. I pretty much just glossed over the code because of the opening statements, plus I seem to have an issue with code that's not tagged. Will have to pay more attention.

[CJ_London]

plus I seem to have an issue with code that's not tagged.

so do I. OP's been advised so let it go this one time

And I agree with your other comment...