Discussion :

[questionsguy]

Bonjour,

J'ai un chart camembert et je souhaite changer la couleur d'une des légendes (la 4) pour qu'une des parts soient mauves. J'ai enregistré la macro suivante en le faisant manuellement :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
ActiveSheet.ChartObjects("Graphique 75").Activate
    ActiveChart.Legend.LegendEntries(4).Select
    With Selection.Format.Fill
        .Visible = msoTrue
        .ForeColor.RGB = RGB(177, 126, 216)
        .Transparency = 0
        .Solid
    End With

Cependant en remettant une couleur grise et en lançant le code avec l'interpréteur VBA pour que ça passe en mauve, il ne se passe rien... Auriez-vous une idée du pb svp ? Aucune erreur affichée ...

J'arrive pourtant à changer le fond des légendes et la couleur du texte en vba mais pas les couleurs individuelles affichées sur le camembert...

[Ben_L]

Bonjour,

Le code suivant est à adapter (noms et index des objets) :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

ThisWorkbook.Sheets("Feuil1").ChartObjects("Graphique 1").Chart.FullSeriesCollection(1).Points(4).Format.Fill.ForeColor.RGB = RGB(0, 0, 0)

Cdt

[questionsguy]

Merci beaucoup Ben_L !

D'où venait le problème avec mon code et pourquoi est ce que l'enregistreur affichait dans la macro ?

[Ben_L]

Je ne maîtrise malheureusement pas suffisamment le fonctionnement interne de l'enregistreur de macros pour être capable d'expliquer les raisons pour lesquelles le code qu'il génère n'est parfois pas fonctionnel.

Dans votre cas, vous essayez d'accéder aux propriétés du graphique en utilisant son conteneur.
Un objet ChartObject est un peu l'équivalent d'une forme (objet Shape). Il s'agit d'un conteneur que le peut placer sur une feuille Excel et qui permet d'y manipuler un graphique (objet Chart).
Le conteneur gère l'interface entre la feuille et le graphique. Il permet (principalement) de placer/déplacer un graphique et de définir son comportement par rapport à la feuille et aux cellules (le graphe doit-il être redimensionné avec les cellule, doit-il être imprimé, etc.).

L'objet Chart, lui, représente le graphe à proprement parler, avec ses différents sous-objets (les axes, la zone de tracé, la légende, etc.), y compris la définition des séries de données.

Ainsi pour modifier la couleur d'une partie d'un graphe camembert, il faut accéder aux propriétés du point de données concerné (méthode .Points). Ce point appartient à une série de données (méthode FullSeriesCollection) qui appartient elle-même à l'objet Chart.

Cdt