Go Premium for a chance to win a PS4. Enter to Win

x
?
Solved

Trying to get form/subform combination to work

Posted on 2011-03-16
3
Medium Priority
?
322 Views
Last Modified: 2012-05-11
I posted a question a while ago, but never really got it resolved:
http://www.experts-exchange.com/Microsoft/Development/MS_Access/Q_26846767.html

I probably failed to give enough information and clarification, so I'll try again.

I am trying to find an easy way for our Accounting team to report to our Sales Manager all of the expenses we incur.  He can then assign each expense to a particular Account.  I have the first part down, where Iink, via QODBC, to Quickbooks via an Access DB, then create/append a table in another database.  I take one more minor step in a query where I reduce the specific detailed accounts to a general category.  (For example, instead of having Travel:Meals, Travel:Lodging, etc., I just map them all to "Travel")

Okay, so my goal is have two separate subforms on one page (or one if that's possible).  I want the user to be able to scroll through a datasheet view of the query, which lists all of the records, but adds the more general category instead of using the account name/number used by Finance & Accounting.  When the user selects a record, I want the other form to show in form view the same record from the original table.  He can then edit a field, adding the account number to which we'll assign this expense.

It was suggested that I used the following code in the first subform, which I assumed was the datasheet one, but I could have been wrong.
 
Private Sub Form_Current()
Dim rst As DAO.Recordset

Set rst = Me.Parent.Subform_OrigExpnes_a.Form.RecordsetClone

rst.FindFirst "txnLineID='" & Me.TxnLineID & "'"
If Not rst.NoMatch Then Me.Parent.Subform_OrigExpnes_a.Form.Bookmark = rst.Bookmark
End Sub

Open in new window


I'm getting an error: 2465 Application-defined or object-defined error
Screenshot Attached.

Can someone walk me through what I might be doing wrong?
0
Comment
Question by:BBlu
  • 2
3 Comments
 
LVL 21

Accepted Solution

by:
Boyd (HiTechCoach) Trimmell, Microsoft Access MVP earned 1400 total points
ID: 35152635
It sounds like what you need is what I call cascading sub forms.

The simplest method I know uses no VBA code. That's right no code.  Place a hidden text box on the main/parent form that has a control source that references a control on the first sub form that has the primary key value used to identify the record to show in the second sub form. The second sub form uses the text box as the master linking field.

0
 

Author Comment

by:BBlu
ID: 35153010
Uhh, okay.  LOL.  I'll try that.  Thank you very much.  I'll let you know if/when I run into any stumbling blocks.
0
 
LVL 21
ID: 35153077
Unfortunately I can't be any more specific to your needs since you have not given use any detail about your database.

Let me know if an example would help.


0

Featured Post

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!

Question has a verified solution.

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

We live in a world of interfaces like the one in the title picture. VBA also allows to use interfaces which offers a lot of possibilities. This article describes how to use interfaces in VBA and how to work around their bugs.
If you’re using QODBC to update QuickBooks data from Microsoft® Access but Access is not showing the updated data, you could have set up QODBC incorrectly.
What’s inside an Access Desktop Database. Will look at the basic interface, Navigation Pane (Database Container), Tables, Queries, Forms, Report, Macro’s, and VBA code.
With Secure Portal Encryption, the recipient is sent a link to their email address directing them to the email laundry delivery page. From there, the recipient will be required to enter a user name and password to enter the page. Once the recipient …
Suggested Courses

773 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