Solved

How to Move to a record on a form based on another forms data

Posted on 2015-02-04
9
126 Views
Last Modified: 2015-02-05
I have a main form... On the main form I have a button that brings up a small form named Reservations.  On this Reservations form there is a combo box that searches for a reservation number.  The search is working fine.  The reservation form is a modal... I would like to put a button on the reservation for that says "Go to this record"... when you click the button, the modal- Reservations form closes and the form that is open in the background moves to the id that was in the Reservations form...

I think I know how to do this when the forms are closed but I don't know the coding for the form that is already open.
0
Comment
Question by:Shaft960
[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
  • 5
  • 4
9 Comments
 
LVL 50

Accepted Solution

by:
Gustav Brock earned 500 total points
ID: 40590456
On the search form, use this code in OnClick event of the goto button:

    DoCmd.OpenForm "YourBackgroundFormName", , , "ID = " & Me!txtReservation.Value & ""
    DoCmd.Close acForm, Me.Name

Adjust ID to the name of the Reservation field on the background form.
Adjust txtReservation to the name of your textbox on the search form.

If reservation number is Text, apply single quotes:

    DoCmd.OpenForm "YourBackgroundFormName", , , "ID = '" & Me!txtReservation.Value & "'"
    DoCmd.Close acForm, Me.Name

/gustav
0
 

Author Closing Comment

by:Shaft960
ID: 40590461
Thanks... I know that was kinda simple but I was blowing it.... Nice job
0
 

Author Comment

by:Shaft960
ID: 40590477
Is there a way that it will go to the forms and show all of the records but just be on the record that I wanted... It is going there but it shows filtered records...
0
Independent Software Vendors: 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 50

Expert Comment

by:Gustav Brock
ID: 40590500
Yes. You can either just push the Filtered button at the bottom of the form.
Or run this code from the button:

    DoCmd.SelectObject acForm, "YourBackgroundFormName"
    DoCmd.SearchForRecord  , , , "ID = " & Me!txtReservation.Value & ""
    DoCmd.Close acForm, Me.Name

/gustav
0
 

Author Comment

by:Shaft960
ID: 40590540
I am getting error messages now.. Method or data member not found
0
 

Author Comment

by:Shaft960
ID: 40590542
DoCmd.SearchForRecord , , , "ID = " & Me![ID]
0
 
LVL 50

Expert Comment

by:Gustav Brock
ID: 40590547
Oh, it use the wrong "Me":

     Dim SearchID As Long
     SearchID = Me!ID.Value
     DoCmd.SelectObject acForm, "YourBackgroundFormName"
     DoCmd.SearchForRecord  , , , "ID = " & SearchID & ""
     DoCmd.Close acForm, Me.Name

 /gustav
0
 

Author Comment

by:Shaft960
ID: 40590550
Error pops up and it highlights the SearchForRecord text...
0
 
LVL 50

Expert Comment

by:Gustav Brock
ID: 40590602
Then something else is going on.
The sample works (right-click, Save As ..., change extension to accdb, Ok).

/gustav
DbSearch.accdb
0

Featured Post

Independent Software Vendors: 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

Suggested Solutions

Title # Comments Views Activity
Access Excel ADO SQL question 8 48
Outlook 2016 VB code syntax 4 35
Handle Apostrophes in VBA SQL - Part 2 10 46
Add Underline to custom Caption on Label 4 34
Phishing attempts can come in all forms, shapes and sizes. No matter how familiar you think you are with them, always remember to take extra precaution when opening an email with attachments or links.
As tax season makes its return, so does the increase in cyber crime and tax refund phishing that comes with it
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…
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 …

739 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