Crystal Report - LIA

Tengo un problema con crystal report 4.5, mi problema es que no puedo abrir el reporte el cual extrae datos de access
Mi codigo es el siguiente

Private Sub CmdInc1_Click()
Dim Formula As String
CrystalReport4.ReportFileName = ReportesJob &
"INCREMENTO_DE_PRODUCTIVIDADjob-off reducido.rpt"
CrystalReport4.DiscardSavedData = True
Formula = "{formato.maquina}='" & txtmaquina.Text & "' AND
{formato.numerodemoldura}='" & txtnummoldura.Text & "' AND
{formato.iniciocarrera}= DATE(" & Format(txticarrera.Text, "yyyy,mm,dd") & ")"
CrystalReport4.ReplaceSelectionFormula Formula
Select Case MsgBox("Desea mandarlo a Pantalla?", vbInformation +
vbYesNoCancel, "Sistemas")
Case vbYes
CrystalReport4.Destination = crptToWindow
CrystalReport4.WindowState = crptMaximized
CrystalReport4.Action = 1
Case vbNo
CrystalReport4.Destination = crptToPrinter
CrystalReport4.Action = 1
Case vbCancel
End Select
End Sub

pero me marca Error 20515 en tiempo de ejecucion, error in formula

me podrian decir que tengo mal?

Gracias por su apoyo.