XL 2016 Modifier format etiquette de données graphique Cascade sous excel 2016 VBA

[Hazardo]

Bonjour,

Je souhaiterai modifier le format des étiquettes de données d'un graphique en cascade en fonction des paramètres région utilisateurs..

J'ai écrit ça comme macro mais ça ne fonctionne pas .. J'ai une erreur 445.

Sub Macro1()

Version = application.International(xlDecimalSeparator)

If Version = "," Then

ActiveSheet.ChartObjects("Graph1").Activate
ActiveChart.FullSeriesCollection(1).DataLabels.Select
Selection.NumberFormat = _
"_* +# ##0.0_)""m€"";_(* -# ##0.0""m€"";_(* ""-""_);_(@_)"

Else

ActiveSheet.ChartObjects("Graph1").Activate
ActiveChart.FullSeriesCollection(1).DataLabels.Select
Selection.NumberFormat = _
"_* +# ##0,0_)""m€"";_(* -# ##0,0""m€"";_(* ""-""_);_(@_)"

End If

End Sub

Hors cette macro fonctionne uniquement si le type de graphique n'est pas en cascade..

Avez-vous une solution ??

Merci

Bien cordialement,

 

[sylvanu]

Re !
Par accident je suis tombé la dessus, au cas où :

Format et position de label VBA

Objectif : Dans un graphe de type waterfall, je souhaite remplacer les étiquettes de données de la série 2 par les valeurs d'une série de cellules (Ca ca mar...

forum.excel-pratique.com

Ils réfèrent aussi à SeriesCollection et non à FullSeriesCollection.