Got a little bit further.. but looks like this wont work..
Dim ser As Excel.Series
For Each ser In chart.SeriesCollection
Debug.WriteLine("series formula: " + ser.Formula.ToString)
Next
the actual formula for the chart is as follows
'='Prime-history'!$C$11:$D$498
the out put from the lines of code above are
'series formula: =SERIES('Prime-history'!$D$11,'Prime-history'!$C$12:$C$498,'Prime-history'!$D$12:$D$498,1)
Kewl so i thought it would just mean a little but of string handeling to get the result i want. But the a did the same thing graphing a chart with data from two different places in the same sheet..
Now
the actual formula for the chart is as follows
'='m3'!$D$6:$E$39,'m3'!$J$18,'m3'!$J$18,'m3'!$K$18 :$K$45
the out put from the lines of code above are
'series formula: =SERIES('m3'!$E$6,'m3'!$D$7:$D$39,'m3'!$E$7:$E$39, 1)
'series formula: =SERIES('m3'!$K$18,'m3'!$D$7:$D$39,'m3'!$K$19:$K$4 5,2)
now thats just two case's there are probaly about 50 different ways of selecting data for a series.. so i think im back at square one..
|