combo box to fill form (1 Viewer)

smartslingaro · Aug 23, 2019

I need a search bar on my form that will bring record in the form from the search bar. I don't code much, but watched a good video that seems to do what I want, and I followed it piece by piece, but keep getting an error :

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.

This is the code I used.
Private Sub cbogotorecord_AfterUpdate()
Dim rst As Object
Set rst = Me.RecordsetClone
rst.FindFirst "[Student ID]=" & Me.cbogotorecord.Value
Me.Bookmark = rst.Bookmark
End Sub

what am i doing wrong. ?

theDBguy · Aug 23, 2019

Hi. I don't see anything wrong with that code other than you're not clearing the variable at the end. Since that code is in the AfterUpdate event of the combobox, and if you're getting an error about the Form's Open event, then that code might not have anything to do with the error you're having. Can you post a sample copy of your db with test data for testing?

smartslingaro · Aug 23, 2019

here is a copy of test... oops telling me it is too big? ok think i did it, I made it smaller and left out most of it. but this is the part I need first. should be simple, no?

theDBguy · Aug 23, 2019

smartslingaro said:
here is a copy of test... oops telling me it is too big? ok think i did it, I made it smaller and left out most of it. but this is the part I need first. should be simple, no?

Hi. Thanks! I'm not getting any errors with your form. Can you provide the steps to duplicate the problem?

smartslingaro · Aug 23, 2019

When I click on the combo box for a name I get the error and it doesn't fill my form. Working on getting you screen shot.

smartslingaro · Aug 23, 2019

error message screen shot View attachment error mess.docx

smartslingaro · Aug 23, 2019

your right, wonder why it works there on test db

theDBguy · Aug 23, 2019

smartslingaro said:
your right, wonder why it works there on test db

When you created the test db, you must have taken out a few things. Try putting them back in one at a time until you find which one is causing the problem and then let us know what it is, so we can help you fix it.

smartslingaro · Aug 23, 2019

thank you for the exercise of copying the db. one of them has all the data, but not the other forms/queries/macros. probably a macro screwing it up., and they don't really seem to work now that i've copied them into newer db. Is that common? normal?

theDBguy · Aug 23, 2019

smartslingaro said:
thank you for the exercise of copying the db. one of them has all the data, but not the other forms/queries/macros. probably a macro screwing it up., and they don't really seem to work now that i've copied them into newer db. Is that common? normal?

So, putting it back together one piece at a time didn't give you an idea what made it stop working again?

smartslingaro · Aug 23, 2019

I have been putting them back one by one.. Haven't found the issue, but I think it was a macro somewhere. I had tons of crap in there as I am still in the process of building. It was good to strip it down. Thank you.

Before I go to much further, I need to figure how to open a report filtered on the current record.

theDBguy · Aug 23, 2019

smartslingaro said:
I have been putting them back one by one.. Haven't found the issue, but I think it was a macro somewhere. I had tons of crap in there as I am still in the process of building. It was good to strip it down. Thank you.

Before I go to much further, I need to figure how to open a report filtered on the current record.

You can use the WhereCondition argument of the OpenReport method. For example:

Code:

DoCmd.OpenReport "ReportName', acViewPreview, , "ID=" & Me.ID

combo box to fill form (1 Viewer)

smartslingaro

Registered User.

theDBguy

I’m here to help

smartslingaro

Registered User.

Attachments

theDBguy

I’m here to help

smartslingaro

Registered User.

smartslingaro

Registered User.

smartslingaro

Registered User.

theDBguy

I’m here to help

smartslingaro

Registered User.

theDBguy

I’m here to help

smartslingaro

Registered User.

theDBguy

I’m here to help

Similar threads

Users who are viewing this thread