Series Values in an Excel Graph 1

[JohnAcc]

Hi There,

Does anyone know how i would retrieve the values of each series point in a graph and populate a seperate worksheet with them.

Any help would be appreciated.

Rgds

John

 

[SkipVought]

Hi,

Within each series is a points collection. Sou you could code something like this...

for each ser in activechart
  for each pt in ser.points
    'here's the  stuff for each point

  next
next

Hope this helps

Skip,
Skip@TheOfficeExperts.com

http://www.TheOfficeExperts.com

 

[JohnAcc]

Hi Skip,

I can activate each series and each point within the graph but i can't seem to return the value of each point.

Any ideas ?

 

[SkipVought]

John,

Actually, your values are in the series...

Sub GetPoints()
    For Each ser In ActiveSheet.ChartObjects(1).Chart.SeriesCollection
      For Each yVal In ser.Values
        MsgBox yVal
      Next
       For Each xVal In ser.XValues
        MsgBox xVal
      Next
   Next
End Sub

Skip,
Skip@TheOfficeExperts.com

http://www.TheOfficeExperts.com

 

[JohnAcc]

Cheers Skip,

Your wisdom never ceases to amaze me! A star for you

Rgds

John

 

[SkipVought]

Thanx, John!

Skip,
Skip@TheOfficeExperts.com

http://www.TheOfficeExperts.com