ok i resolved that problem only to run into another
the new code is,
Private Sub GreenFilter_Click()
On Error GoTo err_Handler
DoCmd.OpenForm "FrmMissingData", acNormal, , , acFormEdit, acWindowNormal
DoCmd.Close acForm, "From1", acSavePrompt
err_handler_exit:
Exit Sub
err_Handler:
If...