Solved

MS Access 2007 Combo Wizard - Find A Rec - Now Broken

Posted on 2010-11-14
7
367 Views
Last Modified: 2012-05-10
I Used the Combo Wizard to create a list box where I can select a value then the form would go to that record.  It worked fine until I added some Option buttons.  Now, even if I create a new combo with the wizard it wll NOT go to the record I selected from the combo box.
Any Ideas?  Thanks.
0
Comment
Question by:Glennikins
7 Comments
 
LVL 10

Expert Comment

by:t_hungate
Comment Utility
What do you have the Option buttons doing?  If possible please attach a copy of your DB with any personal info removed so that we can see the problem.  Please also include any step you have already taken in an attempt to correct the issue. i.e. added now buttons, removed combobox and add new, changed the code for a control, or the row/record source for your form.

Thanks.

TLH
0
 
LVL 84
Comment Utility
If you remove the Option buttons does the find work?

Have you tried re-adding the Find combo (using the Wizard)?
0
 

Author Comment

by:Glennikins
Comment Utility
I have attached a demo copy of the DB with a few records in it and I have removed customer specifics.
I have tried removing the Option buttons and I think the problem had occured before I added the buttons.  I have also tried removing and inserting the combo box to no avail.  The code that used to work came from the Wizard.
Thanks to all for your help.

TC-Demo-1.accdb
0
Complete VMware vSphere® ESX(i) & Hyper-V Backup

Capture your entire system, including the host, with patented disk imaging integrated with VMware VADP / Microsoft VSS and RCT. RTOs is as low as 15 seconds with Acronis Active Restore™. You can enjoy unlimited P2V/V2V migrations from any source (even from a different hypervisor)

 
LVL 19

Expert Comment

by:MINDSUPERB
Comment Utility
Glenn,

How about using this VBA codes instead of the macro. To make the code work, you need to change the control name of your combo box into cboSearch. Then copy and paste the below code in the form module.

Sincerely,
Ed
Private Sub cboSearch_AfterUpdate()

If IsNull(Me.cboSearch) Then

        Me.FilterOn = False

    Else

        Me.Filter = "Job_Master.Job_Num = '" & Me.cboSearch.Column(1) & "'"



Me.FilterOn = True

    End If

End Sub

Open in new window

0
 
LVL 74

Accepted Solution

by:
Jeffrey Coachman earned 500 total points
Comment Utility
1. There is no Primary Key in your Master Table.
I suggest making it the ID Field.

2. The controls in the detail section do not have the same source as the Form itself?

3. I suggest that you post a question to make sure the design of this form is consistent with what you are trying to accomplish here.

But as LSM suggests, if you have a backup of the file when it "Worked" then go back to that, and try again.
0
 

Author Closing Comment

by:Glennikins
Comment Utility
Response Question #2 put me on the right track and once I set all controls to the same source the problem went away.
0
 
LVL 74

Expert Comment

by:Jeffrey Coachman
Comment Utility
ok
0

Featured Post

Top 6 Sources for Identifying Threat Actor TTPs

Understanding your enemy is essential. These six sources will help you identify the most popular threat actor tactics, techniques, and procedures (TTPs).

Join & Write a Comment

I originally created this report in Crystal Reports 2008 where there is an option to underlay sections. I initially came across the problem in Access Reports where I was unable to run my border lines down through the entire page as I was using the P…
Experts-Exchange is a great place to come for help with solutions for your database issues, and many problems are resolved within minutes of being posted.  Others take a little more time and effort and often providing a sample database is very helpf…
Familiarize people with the process of utilizing SQL Server functions from within Microsoft Access. Microsoft Access is a very powerful client/server development tool. One of the SQL Server objects that you can interact with from within Microsoft Ac…
Learn how to number pages in an Access report over each group. Activate two pass printing by referencing the pages property: Add code to the Page Footers OnFormat event to capture the pages as there occur for each group. Use the pages property to …

762 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question

Need Help in Real-Time?

Connect with top rated Experts

11 Experts available now in Live!

Get 1:1 Help Now