I keep getting "Undefined Function" error when I input the "WorkingDaysFC" Function in a query.

This is the Function:

Details

Public Function WorkingDaysFC(LRD_Walid As Date, Status_Date As Date) As Long

    Dim D As Date
    
    WorkingDaysFC = 0
    D = LRD_Walid
    While D <= Status_Date
        If Weekday(D) > 1 And Weekday(D) < 7 Then
            WorkingDaysFC = WorkingDaysFC + 1
        End If
        D = D + 1
    Wend
End Function
Copy