Need Subform to Refresh

[lenm]

I have a form called Address and a subform called Property. The Property subform includes only some of the data available from its source table. I have one button on the Property Subform that allows the user to open and view all of the details about the property. I have a second button that opens a NewProperty form that is used solely for data entry. When the user completes the form, the press a button called Close. When pressing Close, the New Property form closes and returns the user back to the Address form (that also includes the Property Subform).

My problem is that the data that the user just input does not refresh on the imbedded Property Subform. I can use Refresh All on the menu bar to get it to refresh and I can create a button with a macro for Refresh that does the job....but I want it to refresh when the user closes out of the New Property form.

I have tried many things, but nothing works.

Advice is appreicated!



Len

[RuralGuy]

The button that opens the NewProperty form should use the Dialog argument to stop the code in the SubForm from executing until the NewProperty form closes. You can then do a Me.Requery and it will execute when the 2nd form closes.

[lenm]

That sounds promising...but I do not know how to do that. Can you provide some more detail?

[RuralGuy]

What do you have behind the NewProperty button? Code, macro? Show it here if you can.

[lenm]

I have an event procedure for On Click - this open the "new" subform for data entry on the Property New Form

Private Sub Add_New_Property_Click()
DoCmd.OpenForm "Property_New", acNormal, , Me.AddressID = Forms!Address.id
End Sub

I have a couple of other event procedures for On Load (carries through the Master id to populate the foreign key in the Property table) and Before Update (populated update date/time)

[RuralGuy]

Excellent! Just modify your code to:

Private Sub Add_New_Property_Click()
   DoCmd.OpenForm "Property_New", acNormal, , Me.AddressID = Forms!Address.id, , acDialog
   Me.Requery
End Sub

[lenm]

RuralGuy - YOU ROCK! Thanks for your help!

[RuralGuy]

Excellent! Glad we could help.