Solved

Recalc control on main form when data is entered in subform

Posted on 2014-03-20
10
1,213 Views
Last Modified: 2014-04-04
I currently have ME.PARENT.RECALC as an AfterUpdate event of a subform that updates a [=DSUM] calculated control on the main form -- which work great once the subform record has been saved to the table.

Is there a way to recalc the main form control immedately after data has been entered in the field in the subform? So when the user tabs out of the field, the calculated control on the main form immediately reflects the data that was entered?
0
Comment
Question by:jaguar5554
  • 5
  • 5
10 Comments
 
LVL 7

Expert Comment

by:COACHMAN99
ID: 39943224
use the on exit event of the control to ME.PARENT.RECALC
0
 

Author Comment

by:jaguar5554
ID: 39943269
Wow! that worked (probably the only event I did not test!); however, it redirects my cursor to the first field in the first record instead of allowing me to tab to the next field in the current record. Actually, there are four (4) more fields (a total of 5 fields) that need to be entered -- all of which should recalc [on exit].  Thoughts?
0
 
LVL 7

Expert Comment

by:COACHMAN99
ID: 39943302
you will need to store the bookmark, and set the current row after the recalc.

see
http://www.utteraccess.com/forum/return-current-record-t1068751.html
0
 

Author Comment

by:jaguar5554
ID: 39943323
oh dear -- I'm not a programmer and have no idea what that means! LOL
0
 
LVL 7

Expert Comment

by:COACHMAN99
ID: 39943355
store the bookmark in the exit event (you programmed above) and use this bookmark when the form activate event is fired, to go to the record you want.

The bookmark will gave to be a module-level variable so you can access it from both event functions.

Dim strBookmark as String

in the exit event
strBookmark = Me.Bookmark


in the (form) activate event
Me..Bookmark = strBookmark
0
How your wiki can always stay up-to-date

Quip doubles as a “living” wiki and a project management tool that evolves with your organization. As you finish projects in Quip, the work remains, easily accessible to all team members, new and old.
- Increase transparency
- Onboard new hires faster
- Access from mobile/offline

 

Author Comment

by:jaguar5554
ID: 39943721
I saved the following in a module:
Dim strBookmark as String

I added the following to the OnExit event and it looks like this:
strBookmark = Me.Bookmark
Me.Parent.Recalc

I added the following to the OnActivate event on the subform
Me.Bookmark = strBookmark

but it still jumps to the first field in the first record of the subform. Did I misunderstand your instructions?
0
 
LVL 7

Accepted Solution

by:
COACHMAN99 earned 500 total points
ID: 39944127
looks good.
are you re-querying the form when you return? This will lose the bookmark.
if so see:
http://msgroups.net/microsoft.public.access/using-bookmarks-to-select-a-record-af/14482
0
 

Author Comment

by:jaguar5554
ID: 39944257
I reviewed both links you provided and I'm still getting debug errors and can't tab beyond the first field that has the OnExit event. I will continue to research...
0
 
LVL 7

Expert Comment

by:COACHMAN99
ID: 39945583
maybe attach your code?
0
 

Author Closing Comment

by:jaguar5554
ID: 39978898
Although it solution did not resolve my issue, the feedback was good. Thank you much!
0

Featured Post

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)

Join & Write a Comment

Most if not all databases provide tools to filter data; even simple mail-merge programs might offer basic filtering capabilities. This is so important that, although Access has many built-in features to help the user in this task, developers often n…
Overview: This article:       (a) explains one principle method to cross-reference invoice items in Quickbooks®       (b) explores the reasons one might need to cross-reference invoice items       (c) provides a sample process for creating a M…
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 …
Basics of query design. Shows you how to construct a simple query by adding tables, perform joins, defining output columns, perform sorting, and apply criteria.

707 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

17 Experts available now in Live!

Get 1:1 Help Now