Got a solution to this....and it worked.. try below. Good luck all.
Private Sub View_Courses_Click()
On Error GoTo ErrorHandler
DoCmd.Close acForm, "ViewRecords", acSaveYes
DoCmd.OpenReport "Courses", acViewReport, , , acWindowNormal
Exit_ErrorHandler:
Exit Sub
ErrorHandler:
If Err.Number =...