Run-time Error '2191' When Setting a Subreport's Control Source

If you got this error when setting a sub-report's control source trough code,



Try to use this code in the sub-report's Open event :

Static Initialized As Boolean
If Not Initialized Then
   Me.RecordSource = "" ' Add your record source here
   Initialized = True
End If