Comment modifier la couleur des séries dans un graphique ?

Question

Bonjour,

Un des objectif de mon apllication est d'afficher un graph en histo sur une feuille avec 7 colonnes. J'ai des valeurs positives et des valeurs négatives. Ce que je souhaite c'est faire des barres bleus (par ex.) pour les valeurs positives et des barres rouges pour les valeurs négatives.
Pour faire çà j'ai créé un objet MSChart sur une feuille. Je sais comment modifier la couleur d'une série dans la fenêtre de propriétés du MSChart. Jusqu'ici pas de problème.
Ca se complique parce que ce n'est pas toujours les même colones qui ont des valeurs négatives ou positives. Donc j'envisage une procédure de test sur les valeurs de mes séries. Mais avant de me lancer dans cette procédure je voulais savoir comment changer avec du code la couleur d'une série. J'ai essayé avec la procédure suivante pour changer la couleur de la colone de la première série et çà n'a aucune action.

Private Sub Command1_Click()

        MSChart1.chartType = VtChChartType2dBar
        With _
        MSChart1.Plot.SeriesCollection.Item(1).Pen
        .VtColor.Set 255, 255, 255
        End With
        
End Sub

En fait j'ai essayé avec d'autre type de graph (line) et çà marche, mais pas avec les histo.
Si quelqu'un a une solution ou si mon problème est mal posé, qu'il me fasse signe. 

toto76

jacqav · Answer

bonjour
as tu essayé ".colorindex=?" ,? etant le code couleur
ceci etant dans la definition de ton graph
ça marche dans vba excel

bonne chance

cs_toto76 · Answer

hum, marche pas.
merci quand même
si quelqu'un a une autre idée ou une explication au "pourquoi çà marche pas"...

cs_ITALIA · Answer

MsChart1.Plot.SeriesCollection(x).Pen.VtColor.Set 255, 0, 0
Avec x &#224; remplacer par le numero de la Courbe

It@li@

Comment modifier la couleur des séries dans un graphique ?

3 réponses

Discussions similaires