XL 2016 VBA FullSeriesCollection

[F22Raptor]

Hello
Je voudrais récupérer les "Values" et "XValues" d'une série d'un graph.

Autant Msgbox Chart.FullSeriesCollection(1).formula fonctionne (et montre la formule du genre =SERIE(;;Feuil1!$A$1:$A$4;1) )

Autant ça ne marche pas avec MsgBoxChart.FullSeriesCollection(1).Values (ou .XValues)

Une idée pour récupérer les VALUES ?

Merci !

 

[Zon]

Salut,

Comme il y a plusieurs valeurs le msgbox ne marche pas , il en est de même que de faire msgbox range("A1:A10").value.

Cela te retourne un tableau unidimensionnel en Base 1 .


exemple: te retourne la 3 eme valeur de la serie 1 du graphique actif

Dim T

 T = ActiveChart.FullSeriesCollection(1).Values
 
 MsgBox T(3)

A+++

 

[F22Raptor]

Merci Zon !
Je vais tester ça