En el libro pone que
Dim CRWizard As New CRStandardWizard
Dim Application As New CRAXDRT.Application
Dim Report As New CRAXDRT.Report
luego
Set CRWizard.CystalReport = Report
Set Application = CreateObject("CrystalRuntime.Application")
el Report
Set Report = Application.NewReport
(me da error en esta linea)
"Función de creación no activada"
pero nada de nada
yo he probado con
Dim CRWizard As New CrystalReportWizard9.CRStandardWizard
leyendo parece que debo poner la clave del registro y lo he hecho, pero tampoco.