D
deb
I have a form (f001ProjectReview) that has a button. When clicked it opens a
form (f001ProjReviewCT) to a specific ProjectID. So far so good.
On the form (f001ProjReviewCT) there is a subform (f018ContrPerfEmissGuaCT,
key - ProjectID) and a sub-subform (f018ContrPerfEmissGuaCTDetails, key -
ContrPerfEmissGuaCTID).
On form f001ProjReviewCT there is a button that allows edits and additions
of all forms. (see below code.) The form and subform work fine but when I
add the code for the sub-subform I get error "Application-defined or
object-defined error".
I have checked my relationships and all look ok. What am I doing wrong?
Private Sub btnShowDel_Click()
On Error GoTo Err_btnShowDel_Click
Me.AllowAdditions = True
Me!f018ContrPerfEmissGuaCT.Form.AllowAdditions = Tru
Me.f018ContrPerfEmissGuaCT.Form.f018PerfEmissGuaCTDetails.Form.AllowAdditions = True
Me.AllowEdits = True
Me!f018ContrPerfEmissGuaCT.Form.AllowEdits = True
Me.f018ContrPerfEmissGuaCT.Form.f018PerfEmissGuaCTDetails.Form.AllowEdits =
True
form (f001ProjReviewCT) to a specific ProjectID. So far so good.
On the form (f001ProjReviewCT) there is a subform (f018ContrPerfEmissGuaCT,
key - ProjectID) and a sub-subform (f018ContrPerfEmissGuaCTDetails, key -
ContrPerfEmissGuaCTID).
On form f001ProjReviewCT there is a button that allows edits and additions
of all forms. (see below code.) The form and subform work fine but when I
add the code for the sub-subform I get error "Application-defined or
object-defined error".
I have checked my relationships and all look ok. What am I doing wrong?
Private Sub btnShowDel_Click()
On Error GoTo Err_btnShowDel_Click
Me.AllowAdditions = True
Me!f018ContrPerfEmissGuaCT.Form.AllowAdditions = Tru
Me.f018ContrPerfEmissGuaCT.Form.f018PerfEmissGuaCTDetails.Form.AllowAdditions = True
Me.AllowEdits = True
Me!f018ContrPerfEmissGuaCT.Form.AllowEdits = True
Me.f018ContrPerfEmissGuaCT.Form.f018PerfEmissGuaCTDetails.Form.AllowEdits =
True