Run-time error '2455': You entered an expression that has an invalid reference to the property Form/Report

What is is the code in the subform?

here is the sub form code:

Private Sub Form_Current()

'this runs when you select a record
SelectedID = ID 'write the ID to the ID box on the subfoem

'''''''''''''''''''''''

If Not IsNull(Me.SelectedID) Then 'write the data to the Parent form
        Me.Parent!TxtFullName = Me!FullName
        Me.Parent!txtDriverID = Me.SelectedID
        Me.Parent!TranNo = Me!TranNo
        
  End If
  
  '''''''''filters teh payee subform

    Dim DriverID As String
    Dim subformControl As Object

    ' Ensure the parent form and subform are fully loaded before proceeding
    If Me.Parent Is Nothing Then Exit Sub  ' Check that the parent form exists

    ' Get the selected Driver ID from the current record in the subform
    DriverID = Nz(Me.ID, "")

    ' Set reference to the subform control (Payee subform on the main form)
    Set subformControl = Me.Parent!frmPayeeCont

    ' If DriverID is valid, apply the filter on the Payee subform
    If DriverID <> "" Then
        ' Apply the filter to the Payee subform (frmPayeeCont) on Main_Draw
        subformControl.Form.Filter = "PID IN (SELECT PID FROM Driver_Payee WHERE ID = '" & DriverID & "')"
        subformControl.Form.FilterOn = True
    Else
        ' If no Driver ID is provided, remove the filter
        subformControl.Form.FilterOn = False
    End If

  '''''''''''''
  

End Sub

When you click Debug (in the error dialog) which line is highlighted?

subformControl.Form.Filter = "PID IN (SELECT PID FROM Driver_Payee WHERE ID = '" & driverID & "')"

not an expert, but chat GPT say probably due to teh fact the subform amy not be laoded yet?

bump