Change Chart Object Problem

[Bill Sturdevant]

I have a chart object on a form. I use the following code
to change the values of the bars on the chart:

Dim chtObj As Object
Set chtObj = Me![Evaluation Results Graph].Object
chtObj.Application.datasheet.cells(2, 1).Value =
overallPointAverage
chtObj.seriesCollection(1).Points(1).Interior.Color =
QBColor(intValue)


The reference to ".datasheet.cells(2, 1).Value" works for
every bar except the first one.

Is there a known problem or a way around this?