Find the value of a point with VBA
Andy Pope a écrit :
Hi,
This will get the values from series 1. Note that linked cells with
errors or #N/A will not return a value.
Sub X()
Dim lngIndex As Long
On Error Resume Next
With ActiveChart.SeriesCollection(1)
For lngIndex = 1 To .Points.Count
Debug.Print "Series 1 Point "; lngIndex, _
Application.WorksheetFunction.Index(.Values, lngIndex)
Next
End With
End Sub
Hi,
I tested it and it works exactly as I need. Thanks again.
--
François L
|