Hi James,

of course <smile>

once you build the filter for the subform, to apply it:

'~~~~~~~~~~~~~~~~
with me.subform_controlname.form
   .filter = strFilter
   .FilterOn = true
end with
'~~~~~~~~~~~~~~~~

WHERE
strFilter is the string variable containing the subform filter

... I am assuming you are talking about a subFORM and not a subREPORT.
If you really meant to say subreport, then you can save the filter
before you run the report.

put this function in a general module:

'~~~~~~~~~~~~~~~~
Sub Report_SetReportFilter(pReportName as string, pFilter as string)
   'PARAMETERS
   ' pReportName is the name of the report
   ' pFilter is the filter to apply

   Dim rpt As Report
   DoCmd.OpenReport pReportName, acViewDesign
   Set rpt = Reports(pReportName)
   rpt.Filter = pFilter
   rpt.FilterOn = true
   DoCmd.Save acReport, pReportName
   DoCmd.Close acReport, pReportName
   Set rpt = Nothing
End Sub
'~~~~~~~~~~~~~~~~

where
pReportName = name of report
pFilter = filter string
******************************

before you render the report, send the report name and filter string to
the SetReportFilter sub

Warm Regards,
Crystal

Access Basics
8-part free tutorial that covers essentials in Access
http://www.accessmvp.com/Strive4Peace/Index.htm

 *
   (: have an awesome day :)
 *