Yes Allen
I have discovered that the error only occurs after this button (see code
below) has been used to change the displayed records in the (just for
background:the form has three forms frm1 the mainform, frm2 the subform or
frm1 adn frm3 the subform of frm2.)
Any ideas why?
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
Louverril said:
"2455 you entered an expression that has an invalid reference to the
property form/report"
|I get this error if I close teh database with a screen open adn the Nav
bar
not loaded - Access Options.
If I change the options to show the nav bar the error does not occur.
How can I stop this error - I need to hide the nav bar.
Thanks
lou