Hi Arvil, Micron and Davegri
Thank you all for your replies and patience. I've got it working the way I wanted using this code;
Code:
Select Case Me.cmbFilter
Case "All"
DoCmd.OpenReport "PhoneCallsSpecifyData", acPreview
Case "Resolved"
DoCmd.OpenReport "PhoneCallsSpecifyData", acPreview, , "Resolved = True"
Case "Unresolved"
DoCmd.OpenReport "PhoneCallsSpecifyData", acPreview, , "Resolved = False"
End Select
So, after all of that I can now display an error message that means something in the report's NoData event !
Code:
Private Sub Report_NoData(Cancel As Integer)
Dim message As String
message = "Sorry, there is no data to report for the period " & _
Forms!frmPhoneSupportReportData!txtStartDate & " and " & Forms!frmPhoneSupportReportData!txtEndDate & " for " & Forms!frmPhoneSupportReportData!cmbFilter & " records."
MsgBox message, vbInformation, "No Data"
Cancel = True
End Sub
A huge thank you to Micron and Davegri for your suggestions and samples. As a result, I'm going to totally re-work the whole Reports section of the DB, which will take some doing, but will give me a really nice result.