Want to protect your cyber security and still get fast solutions? Ask a secure question today.Go Premium


I need to open a main and sub form and have the subform open to a specific record

Posted on 2011-03-09
Medium Priority
Last Modified: 2012-05-11

My main form is called frmProspects and the subform is frmQuotes.

The two are linked by customer number.

I need to open to a specific customer number and find a specific quote.

I'm sure this should be easy and I'm doing something wrong.  Just not very experienced with sub forms!

Do I set the recordsouce or linked property?

Let's say customer number is 12345 and I need to open to quote 223344

Can anyone help.
Question by:pcalabria
  • 5
  • 3
LVL 74

Expert Comment

by:Jeffrey Coachman
ID: 35084220
Put a textbox on the main form to type in the QuiteID

put a button with this code to filter the subform:

dim lngFilter as long
    Me![YourSubForm].Form.Filter = "[QuoteID]=" & lngFilter
    Me![YourSubForm].Form.FilterOn = True

If Quote ID is text use this:
dim strFilter as String
strFilter =me.SomeTextBox
    Me![YourSubForm].Form.Filter = "[QuoteID]=" & strFilter
    Me![YourSubForm].Form.FilterOn = True
LVL 74

Expert Comment

by:Jeffrey Coachman
ID: 35084237
oops sorry, ...for text QuoteID use this:

dim strFilter as String
strFilter =me.SomeTextBox
    Me![YourSubForm].Form.Filter = "[QuoteID]=" & "'" & strFilter & "'"
    Me![YourSubForm].Form.FilterOn = True

Author Comment

ID: 35086437
Thanks Jeff, but I'm still having trouble.
Let me give you the actual setup because I tried to simplify things before.

I have a form which serves as my QUOTE MENU.
From this form, the user can look up a quotenumber using a combo box.
The onupdate event of the combo box sets a global variable of the type long to the quote number.


Normally, when I open the NewProspect form (the main form) I see information about the company.  In the subform, I can navigate through all the quotes that we have generated to this company.

In this case, I would like to open the NewProspect form as usually, with all the quotes available in the subform, but to have the subform automatically connect the correct quote.

So I need to open the NewProspect form and link it to the subform with all the quotes for that company, in quote number order, however, the specific quote displayed should be the current quote.

After reading your email, I wrote the code below, however it does not work.  An inputbox is dispalyed asking me to enter the quotenumber.  Do you see anything here wrong?


DoCmd.OpenForm "NewProspect", , , "[CustomerNumber]=" & intCustomerNumber
Forms![newprospect].Form.Filter = "[QuoteNumber]=" & stQuoteNumber
Forms![newprospect].Form.FilterOn = True
Industry Leaders: We Want Your Opinion!

We value your feedback.

Take our survey and automatically be enter to win anyone of the following:
Yeti Cooler, Amazon eGift Card, and Movie eGift Card!

LVL 74

Accepted Solution

Jeffrey Coachman earned 2000 total points
ID: 35087235
1. Well your code there does not have stQuoteNumber declared...?
(Or intCustomer, for that matter)
So since you did not post the full code, I can't really comment...
(There may be spelling errors, ..etc)
...and you did not explain what "it does not work" means (error message?, system crash?, incorrect result?)

2. I would not put the code on the AfterUpdate event of the combobox, because this will force the form to open as soon as the value is selected.
What if the user selected the wrong Quote?
What if you add a few more comboboxes for other things?
This functionality is typically put on a button, so the user can review all of their selections *then* trigger the code.

3. <I can navigate through all the quotes that we have generated to this company.>
"company"?, ...I thought were "Prospects"?

4. You are asking to filter a subform of a Main form without filtering the main form first.
In other words, you are asking the child record to filter the Parent.

Things like this are typically done in a "Grouped" report (This is even tricky to do in a SubReport) where the only the ChildID need be specified.

Sample attached



Author Comment

ID: 35088070
Jeff, here are my responses...

Let me thank you in advance for your continued help.

I delcare stQuoteNumber along with all of my global variables in a another module.
intCustomer is actually pulled from another column in the query which displays the quote number in the combo box.

The form that I'm updating is intended to be a vehicle for the salesperson to quickly look at and edit the quote when he recieves an answer to a "follow up email".

Wiht respect to what does does not work mean, "An inputbox is dispalyed asking me to enter the quotenumber".
By this I mean, instead of openning the quote, a pop up box asks for the quotenumber.

I understand your suggestion.  I may need to do this, however, the sales person usually cuts and pastes the quote number from an email he recieves, so I'm trying to save an extra step.  I may need to add to change the combo to a text box and add a go button if this doesn't work out well.

I agree that Prospects is not a very good name for the table, however, it's such a pain to change a table name once lots of query's have been written that I just deal with it!   Prospects is actually a table listing all companies how have ever called us. Each record has a customernumber which is of the type long.

I'm not sue what this means but basically, when we create a new quote we basically create a new subform for the quote, and can then look at other quotes to the same company.   I'd like to bring up the same screen, but jump to the current quote without first making the sales person search through every quote we've generated for this company.

Thanks again.


Author Closing Comment

ID: 35100676
Although this solution did not completely solve my issue, it did give me a head start on finding the solution that I will ultimately use.  Thanks JEFF
LVL 74

Expert Comment

by:Jeffrey Coachman
ID: 35105074
OK great.

LVL 74

Expert Comment

by:Jeffrey Coachman
ID: 35105154
Thanks, actually this was an interesting issue...
So I learned something here as well.



Featured Post

Concerto Cloud for Software Providers & ISVs

Can Concerto Cloud Services help you focus on evolving your application offerings, while delivering the best cloud experience to your customers? From DevOps to revenue models and customer support, the answer is yes!

Learn how Concerto can help you.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Explore the ways to Unlock VBA Project Password Excel 2010 & 2013 documents. Go through the article and perform the steps carefully to remove VBA Excel .xls file.
Windows Explorer lets you open cabinet (cab) files like any other folder. In VBA you can easily handle normal files and folders, but opening and indeed creating cabinet files takes a lot more - and that's you'll find here.
Have you created a query with information for a calendar? ... and then, abra-cadabra, the calendar is done?! I am going to show you how to make that happen. Visualize your data!  ... really see it To use the code to create a calendar from a q…
This lesson discusses how to use a Mainform + Subforms in Microsoft Access to find and enter data for payments on orders. The sample data comes from a custom shop that builds and sells movable storage structures that are delivered to your property. …
Suggested Courses

579 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