try taking the values off the end

With ActiveSheet.ChartObjects("Chart 964").SeriesCollection(5)
XXX = .Values
End With
POINT = lBound(XXX)


--
Regards,
Tom Ogilvy


"Paul" wrote:

I am trying to get vba to give me the low value of the chart series; but the
error message says "object does not support this property or method" in the
line starting with With"

What did i do to deserve this???

:-))

Sub LOWOFSERIES()
Dim XXX As Variant
Dim POINT As Long
With ActiveSheet.ChartObjects("Chart 964").SeriesCollection(5).Values
XXX = .Values
POINT = lBound(XXX)
End With
MsgBox POINT
End Sub