Type mismach report On-Open for dynamic crosstab

[thmsjlmnt3953]

Hi,

This code runs to the set frm part then i get a type mismatch? ive tried a few different things and still nothing?

Private Sub Report_Open(Cancel As Integer)

   '  Create underlying recordset for report using criteria entered in
   '  EmployeeSalesDialogBox form.
    
   Dim intX As Integer
   Dim qdf As QueryDef
   Dim frm As Form

   '  Set database variable to current database.
   Set dbsReport = CurrentDb
   Set frm = Forms!frmNavigation!NavigationSubform
   '  Open QueryDef object.
   Set qdf = dbsReport.QueryDefs("EmployeeSales")
   ' Set parameters for query based on values entered
   ' in EmployeeSalesDialogBox form.
   qdf.Parameters("Forms!frmnavigation!navigationsubform!txtstartdate") _
     = frm!BeginningDate
   qdf.Parameters("Forms!frmnavigation!navigationsubform!txtenddate") _
     = frm!EndingDate

   '  Open Recordset object.
   Set rstReport = qdf.OpenRecordset()
   
   '  Set a variable to hold number of columns in crosstab query.
   intColumnCount = rstReport.Fields.Count
    
End Sub

 

[smig]

Type mismatch is mostly when trying to match a number to string (or something like this)
Check all your joins

 

[JHB]

You are missing the ".Form" at the end.

Set frm = Forms!frmNavigation!NavigationSubform[B][COLOR=Red].Form[/COLOR][/B]