Walk over all the points in a series and extract the X value?

  • Thread starter Thread starter Chrisso
  • Start date Start date
C

Chrisso

Hi

I am using a standard clustered column chart in Excel 2003.

I would like to be able to walk over all the points in a series and
extract the X value for inspection.

Is this possible? I cannot see how to do this.

Thanks in advance,
Chrisso
 
Hi

I am using a standard clustered column chart in Excel 2003.

I would like to be able to walk over all the points in a series and
extract the X value for inspection.

Is this possible? I cannot see how to do this.

Thanks in advance,
Chrisso
Click to expand...

I should have stated that I have the code to walk over the points - I
just cannot see how to extract the X value for each point:

Dim cht As Chart, ser As Series
Set cht = ActiveChart
Set ser = cht.SeriesCollection(1)
Dim pt As Point
For Each pt In ser.Points
' ## how do I get the X value for pt?
Next pt

Cheers
Chrisso
 
Use
Dim cht As Chart, ser As Series
Set cht = ActiveChart
Set ser = cht.SeriesCollection(1)
Dim I As Integer
For I = 1 To ser.Points.Count
Debug.Print I & ": " & ser.XValues(I)
Next I

I should have stated that I have the code to walk over the points - I
just cannot see how to extract the X value for each point:

Dim cht As Chart, ser As Series
Set cht = ActiveChart
Set ser = cht.SeriesCollection(1)
Dim pt As Point
For Each pt In ser.Points
' ## how do I get the X value for pt?
Next pt

Cheers
Chrisso
Click to expand...
Regards,

Tushar Mehta
Microsoft MVP Excel 2000-present
www.tushar-mehta.com
Excel and PowerPoint tutorials and add-ins
 
Thanks Tushar - just what I needed.

Chris

Use
    Dim cht As Chart, ser As Series
    Set cht = ActiveChart
    Set ser = cht.SeriesCollection(1)
    Dim I As Integer
    For I = 1 To ser.Points.Count
        Debug.Print I & ": " & ser.XValues(I)
        Next I






Regards,

Tushar Mehta
Microsoft MVP Excel 2000-presentwww.tushar-mehta.com
Excel and PowerPoint tutorials and add-ins- Hide quoted text -

- Show quoted text -
Click to expand...
 
Back
Top