SoloCodigo

Hola Chicos.
Trabajo con V.B. 6.0 para Base de Datos con Access 2007 y para los reportes con Crystal Reports 11.5.8


 Me aparece el siguiente error al hacer clic:   “Aquí se requiere una cadena”.
Error lo indica en la línea  prcdReport.RecordSelectionFormula = "{IngresoVales.Fecha} in .....


  El código es:

Private Sub cmdBoton_Click()

Screen.MousePointer = vbHourglass
Set Aplication = New CRAXDRT.Application
Set prcdReport = Aplication.OpenReport("C:Archivos de programaBusiness ObjectsCrystal Reports 11.5ReporteListado.rpt")
prcdReport.Database.SetDataSource prcdReport
prcdReport.EnableParameterPrompting = False
prcdReport.DiscardSavedData
prcdReport.ExportOptions.DestinationType = crEDTDiskFile
prcdReport.ExportOptions.Parent.DisplayProgressDialog = True
prcdReport.RecordSelectionFormula = "{IngresoVales.Fecha} in Date(" & Year(DTPicker1) & "," & Month(DTPicker1) & "," & Day(DTPicker1) & ") AND {IngresoVales.Fecha} to Date(" & Year(DTPicker2) & "," & Month(DTPicker2) & "," & Day(DTPicker2) & ")"

End Sub

Espero haber sido claro.  Si me pueden dar una mano desde ya muchas gracias.  Saludos.