Still getting stuck (see attachment),
This is the codes as it stands:
Private Sub Command98_Click()
DoCmd.Close acForm, "frmCandidates", acSaveYes
Dim objAccObj As AccessObject
Dim objProj As Object, openFrm As Boolean
openFrm = True
Set objProj = Application.CurrentProject...