Link to the subform form Error 2455: you entered an expression that has an invalid link to the Form / Report property

Question

Yesterday a uniform / subformation that worked well for me for a long time suddenly started throwing Error 2455: You entered an expression that has an invalid reference to the property Form/Report.

Below is my diagnosis of the problem. This seems like a mistake.

My question is: have you seen any of you? If you are interested, could you try to duplicate the problem and let me know what you found?

Problem:

• I had a form that worked completely autonomously, setting data sources for each of its subforms
• But the form failed when it was placed in the control of the subform, giving error 2455 for each subform when trying to set the SubForm.Form.RecordSource property (but again, only when the form itself was subordinate)

After several experiments, I narrowed it down:

• The SubForm control was too short to show a section of the form. Only the title was displayed.
• Since the form detail was not visible, Access silently disabled all subforms on the form !!!

My workaround: Always make sure that at least part of the form is displayed in the SubForm control. Detailed section. Or:

• Increase the height of the SubForm control.
• Move the controls from the Title form to the part and make the title shorter or invisible, so only the details are displayed.

Can you duplicate this? This is strange, so I would like some independent confirmation of this problem. So please, if you have some time, try the following:

• Make a form with:
  • ,
  • , 0,5
• :
  • 0,6 , .
  • subform.Form.RecordSource().
  • :
• :
  • 0,4 ,
  • , .Form.RecordSource.
  • : 2455

"" RecordSource . / .

, Access, , . Access Version 14.0.7128.5000, .

Answer 1

, , OP , , - , , , " 2455: , Form/Report". .

Access 2016. 2455 Form_Load(), :

Private Sub Form_Load()
    Set mevtReferenceToSubform = Me.frmASubform.Form
End Sub

fooobar.com/questions/1584331/... :

" , ( LinkChild/LinkMaster), , ."

-, . subforms.Form ' , RecordSource !

TempVar, , , . , TempVar , ...

Answer 2

, Form CurrentView. , , CurrentView 1 ( "" ). :

If Me.CurrentView <> 1 Then
  Me.sfrWPCN.Form.RecordSource = strSQL
End If