Hi Alex/Richard

I got the reports to display all my records, but when I run the search form I don't know how I can just feed the result of the search form to the report.

My search code is as follows:

Dim WhereStr As String
    Dim SQLStr As String

    WhereStr = ""
    SQLStr = ""
    
    ' WHERE CONDITIONS
   If JobNumber <> "" And Not IsNull(JobNumber) Then
        WhereStr = "JobNumber LIKE '*" & JobNumber & "*'"
    End If
    If JobName <> "" And Not IsNull(JobName) Then
        If WhereStr <> "" Then WhereStr = WhereStr & " AND "
        WhereStr = WhereStr & "JobName LIKE '*" & JobName & "*'"
    End If
    If SFName <> "" And Not IsNull(SFName) Then
        If WhereStr <> "" Then WhereStr = WhereStr & " AND "
        WhereStr = WhereStr & "SFName LIKE '*" & SFName & "*'"
    End If

    SQLStr = "SELECT JobID, CoordID, JobNumber, JobName, SFName, SuperMPhone, CFN FROM SearchQ "
    If WhereStr <> "" Then SQLStr = SQLStr & "WHERE " & WhereStr

    SearchListBox.RowSource = SQLStr

any help would help I am going in circles getting error after error.

---

Reply from Alex Hedley:

You could set the RecordSource of the Report in the Open Method

Private Sub Report_Open(Cancel As Integer)
    Me.RecordSource = Forms!FORMNAME!FIELD
End Sub

Or you a QueryDef to set a the SQL of a Query then base the Report on that.