OpenForm: ProjectSub_tbl, Form, , ="[ProjectID]=" & Nz([ProjectID],0), , Dialog
SetTempVar: ProjectID, [ProjectID]
SetTempVar: ProjectID, Nz(DMax("[ProjectID]",[Form].[RecordSource]),0)
Requery
SearchForRecord: , , First, ="[ProjectID]=" & [TempVars]![ProjectID]
RemoveTempVar: ProjectID
I...