Skip to Content
0
Former Member
Dec 01, 2009 at 12:32 PM

Change chart object with crosstab base not work

30 Views

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