Utilicé la opción del pdf, pero me da un error

Utilicé el siguiente código:

Dim appl As New CRAXDRT.Application
Dim rep As CRAXDRT.Report
Private Sub Command1_Click()
      Set rep = appl.OpenReport("c:\mytest.rpt", 1)
      rep.ExportOptions.DiskFileName = "c:\pdf_report.pdf"
      rep.ExportOptions.DestinationType = crEDTDiskFile
      rep.ExportOptions.FormatType = crEFTPortableDocFormat
      rep.Export False
End Sub

Y me da un error en REP.EXPORT FALSE y dice Visual Basic dejó de funcionar (El programa dejó de funcionar por un problema. Windows cerrará el programa y le notificará si hay una solución.

Si me pueden ayudar con esto.