Solved

double click name open a record

Posted on 2014-02-11
8
466 Views
Last Modified: 2014-02-19
I have a list of leads on Lead List tab on the Contact form.  I need to be able to click the row and bring up the record on the General tab.
1.accdb
0
Comment
Question by:lehi52
[X]
Welcome to Experts Exchange

Add your voice to the tech community where 5M+ people just like you are talking about what matters.

  • Help others & share knowledge
  • Earn cash & points
  • Learn & ask questions
  • 4
  • 2
  • 2
8 Comments
 
LVL 37

Expert Comment

by:PatHartman
ID: 39851493
I can't download your database at the moment so I may be off target.

Assuming the the two forms are actually subforms on another form, change the RecordSource query of the form you want to control so that it references a control in the driving form.

Select ...
From ...
Where somefield = Forms!yourmainform!sfrm1.Form!keyField;

Then in the click event, requery the subform.
Me.Parent!sfrm1.Form.Requery

or the long form of reference would be
Forms!yorumainform!sfrm1.Form.Requery
0
 

Author Comment

by:lehi52
ID: 39851536
There is a subform called contact form1 with a list of names.  WHen you click a name it needs to load the record on a different tab.   I attached the database but zipped up. I am a beginner so the more simple you can make it the better.
2.accdb
0
 
LVL 37

Expert Comment

by:PatHartman
ID: 39851567
I can't load your database.  I am not in my office.  Can you try to modify the query to reference the form field that contains the foreign key you need to reference?  You only need the one line of code (the requery) in the click event to make this work.
0
Online Training Solution

Drastically shorten your training time with WalkMe's advanced online training solution that Guides your trainees to action. Forget about retraining and skyrocket knowledge retention rates.

 

Author Comment

by:lehi52
ID: 39851732
Ill see if I can figure it out based on what you put.
0
 
LVL 10

Expert Comment

by:Gozreh
ID: 39853307
I added a search when you Double Click the police name.
3.accdb
0
 

Author Comment

by:lehi52
ID: 39853577
Gozreh,  is there a way to have it change tabs and do the search when you click the name.
0
 
LVL 10

Accepted Solution

by:
Gozreh earned 500 total points
ID: 39853608
yes, add to the code    Me.Parent.TabCtl0 = 1
Private Sub Policy_Name_DblClick(Cancel As Integer)
   DoCmd.SearchForRecord acDataForm, "Contact Form", acFirst, "[ContactID] = " & Nz(Me.ContactID, 0)
   Me.Parent.TabCtl0 = 1
End Sub

Open in new window

0
 

Author Closing Comment

by:lehi52
ID: 39853634
Gozreh, as usual.   Your help is immense.  I added the code and it works great.
0

Featured Post

Comprehensive Backup Solutions for Microsoft

Acronis protects the complete Microsoft technology stack: Windows Server, Windows PC, laptop and Surface data; Microsoft business applications; Microsoft Hyper-V; Azure VMs; Microsoft Windows Server 2016; Microsoft Exchange 2016 and SQL Server 2016.

Question has a verified solution.

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

In a multiple monitor setup, if you don't want to use AutoCenter to position your popup forms, you have a problem: where will they appear?  Sometimes you may have an additional problem: where the devil did they go?  If you last had a popup form open…
It’s the first day of March, the weather is starting to warm up and the excitement of the upcoming St. Patrick’s Day holiday can be felt throughout the world.
Access reports are powerful and flexible. Learn how to create a query and then a grouped report using the wizard. Modify the report design after the wizard is done to make it look better. There will be another video to explain how to put the final p…
Polish reports in Access so they look terrific. Take yourself to another level. Equations, Back Color, Alternate Back Color. Write easy VBA Code. Tighten space to use less pages. Launch report from a menu, considering criteria only when it is filled…

724 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