XL 2016 VBA FullSeriesCollection

F22Raptor · 25 Août 2023

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 · 27 Août 2023

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

VB:

Dim T

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

A+++

F22Raptor · 30 Août 2023

Merci Zon !
Je vais tester ça

XL 2016 VBA FullSeriesCollection

F22Raptor

XLDnaute Impliqué

Zon

XLDnaute Impliqué

F22Raptor

XLDnaute Impliqué

Discussions similaires