Hi
I use this simple script to change some settings on the chart. Is a chart base on a crosstab, an error occurs: " The chart data fields are not valid.". All other chart not base on a crosstab work fine. Why?
Example:
Public Sub test(ByVal strTempFile As String)
Dim rpt As New CrystalDecisions.CrystalReports.Engine.ReportDocument
Dim crROC As CrystalDecisions.ReportAppServer.Controllers.ReportObjectController
Dim crAppChart As CrystalDecisions.ReportAppServer.ReportDefModel.ChartObject
Dim crAppChartNew As CrystalDecisions.ReportAppServer.ReportDefModel.ChartObject
rpt.Load(strTempFile, OpenReportMethod.OpenReportByTempCopy)
crROC = rpt.ReportClientDocument.ReportDefController.ReportObjectController
For Each crAppChart In crROC.GetReportObjectsByKind(CrystalDecisions.ReportAppServer.ReportDefModel.CrReportObjectKindEnum.crReportObjectKindChart)
crAppChartNew = crAppChart.Clone()
crAppChartNew.ChartStyle.TextOptions.DataLabelFont.Font.Name = "Arial"
crROC.Modify(crAppChart, crAppChartNew) 'Error: The chart data fields are not valid.
Next
End Sub