XL 2016 VBA afficher l'adresse des points (values) et abscisses (xvalues) d'une série

F22Raptor

XLDnaute Impliqué
Hello,
Comment faire, avec une MsgBox par exemple pour afficher l'adresse des points d'un graph :

MsgBox ActiveChart.FullSeriesCollection(1).Values
et
MsgBox ActiveChart.FullSeriesCollection(1).XValues

ne fonctionnent pas !
L'idée étant d'afficher par exemple "='Sheet1'!$B$31:$AI$31"

Merci !
 

F22Raptor

XLDnaute Impliqué
J'ai trouvé un moyen pour contourner : pas exactement ce que je souhaitais, mais ça peut être exploité :
MsgBox ActiveChart.FullSeriesCollection(1).Formula

Ca sort une longue formule, avec les abscisses et les ordonnées.
On peut ensuite faire de la manip de chaîne pour récupérer ce qui nous intéresse.
 

Discussions similaires

Réponses
8
Affichages
616