Primero de todo, gracias por responder...
He insertado una formula en formula fields con nombre Compras, directamente me ha salido una ventana llamada "Workshop" en esa ventana no he hecho nada, simplemente la he cerrado. Luego en formula fields veo que ha creado la etiqueta "Compras" que he desplazado hasta el reporte pudiendose ver @Compras en el campo. He guardado cambios y he cerrado mi .rpt
En vistual basic tengo este código
Código:
Private Sub Form_Load()
Dim crystal As CRAXDRT.Application
Dim Report As CRAXDRT.Report
CRViewer.DisplayBorder = False
CRViewer.DisplayTabs = False
CRViewer.EnableDrillDown = False
CRViewer.EnableRefreshButton = False
RS.Open consultado, Cxn, adOpenStatic, adLockReadOnly
Set crystal = New CRAXDRT.Application
Set Report = crystal.OpenReport(App.Path & "\Iva.rpt")
Report.DiscardSavedData
Report.Database.SetDataSource RS
Report.ParameterFields(0).AddCurrentValue ("Hola")
CRViewer.ReportSource = Report
CRViewer.ViewReport
Do While CRViewer.IsBusy
DoEvents
Loop
CRViewer.Zoom 100
RS.Close
End Sub
Obtengo el error el subíndice esta fuera del intervalo...
¿Que puede ser?