Extracting XValues Formula string From Series collection ?
agreed, quite odd, but i guess there's some logic behind the object model
if you break at the debug line and look at xy in the watch window you'll see
that it's of type 'string' and looking at cl in the watch window, cl.xyvalues
is a collection of strings...i see no formula here
i suspect that the formula that you want is buried in the chart object
somewhere though
Sub Test()
Dim cl As Series, xy 'As Object
Set cl = ActiveChart.SeriesCollection(1)
For Each xy In cl.XValues
Debug.Print xy
Next
End Sub
"Dan Thompson" wrote:
This is very frustrating I currently have this code
Sub Test()
Dim X
X = ActiveChart.SeriesCollection(1).Formula
Debug.Print X
End Sub
The above code works fine and outputs
=SERIES("MyChart",data!$FK$597:$FK$638,data!$FJ$59 7:$FJ$639,1)
which is what I want however ........
When I try this code
Sub Test()
Dim B
B = ActiveChart.SeriesCollection(1).XValues.Formula
Debug.Print B
End Sub
I get a runtime error 424 Object Requiered
What am I doing wrong Surely there is a method to return the formula string
value of the XValues of a chart series ??
Dan Thompson
|