Button to open form with a Where condition

[Newbie2]

I am working with Access 2007 and have two Forms:


Form 1- Patient Form (PatientNum)
Form 2- Patient History (PatientNum)
I have just viewed a great YouTube video on how to make a button Open a Form and go to a matching record using the Where Condition. I got it to work great, but it only works once when opening the new form from the navigation bar. It doesn’t seem to want to work while I have both forms opened. I have to close Form 2 and used the button on Form 1 to make the event happen.
I am using a simple macro to open Form 2 with the following conditional statement.
[PatientNum]= [Forms]![PatientForm]![PatientNum]
Because I am entering lots of data I generally have both forms open and flip back and forth using the tabs. I would like, when I press the Open Form 2 button for the Patient Number to match the Patient Number on the form I am working on.
Thanks.. you guys have never let me down
Newbie2

[June7]

Have you considered a form/subform arrangement? http://office.microsoft.com/en-us/ac...010098674.aspx

[Newbie2]

Hi Super Moderator,
Yes, I have, but i really would like to create the button. I will soon be adding more Forms and this will be a very helpful tool.

[June7]

You flip back and forth using what tabs?

More forms? Are they related to PatientForm? Could use a tab control and put each subform on a page of tab control.

The trick is figuring out how to configure the form properties and what event to put code in to requery the second form when it is already open. I only use VBA.

Set the Filter property of PatientHistory form to PatientNum=Forms!PatientForm!PatientNum and FilterOnLoad property to Yes. Then in the button Click event that opens the form:
If CurrentProject.AllForms("PatientForm").IsLoaded Then
Form_PatientHistory.Requery
Form_PatientHistory.SetFocus
Else
DoCmd.OpenForm "formname"
End If