2455 Error when navigation bar set to not show Access 2007

L

Louverril

I get this error

2455 You entered an expression that has an invalid reference to the property
Form/Report

If I have the navigation bar option unchecked on Access Options Current
database and I close the database using the X in th etop right corner, with
my main form open and AFTER just slectign a new record via a vombo box which
runs this code.

If the nav bar is there - no error.

Lou

Private Sub btnSelectCase_Click()
'Click to make CboSeletCase combo appear

On Error GoTo CCError

cboSelectCase.SetFocus
cboSelectCase.Dropdown
Exit Sub

CCError:
MsgBox Err.Number & " " & Err.Description
Resume Next

End Sub

Private Sub cboSelectCase_AfterUpdate()
'Combo to select and display an existing case.
'Always displays section 1

On Error GoTo CCError

CCRequeryCaseSubforms Me


CCHighlightSection Me.btnPastReq
CCInactiveSection Me.btnFuture
CCInactiveSection Me.btnEq
CCInactiveSection Me.btnReport

DoCmd.SearchForRecord , "", acFirst, "[C_ID] = " &
Str(Nz(Screen.ActiveControl, 0))
Me.Form![frmC_Options].Form.RecordSource = "qryCOPast_Section"


Me.[frmC_Options].Form.Visible = True
lngSection = 1 ' so section can be set on a c option new record later
'and correct requery performed
Me.frmC_Options.Form!C_Section.DefaultValue = 1

Exit Sub

CCError:
MsgBox Err.Number & " " & Err.Description
Resume Next

End Sub
 
Top