Propriété des histogrammes: titre, couleur des barres... Résolu

Question

Salut &#224; tous, 

J'aimerai savoir quelles sont les propri&#233;t&#233;s des graphiques qu'il faut utiliser pour en modifier l'aspect (et non pas le contenu, &#231;a, je sais faire). 

Quelle est la propri&#233;t&#233; du graphique qui g&#232;re le titre? 

Existe-t-il un moyen de configurer les couleurs des barres d'un histogramme? Parce que d&#232;s que les param&#232;tres du graphique varient, les couleurs varient. Ce que je voudrais c'est par exemple (peut importe les crit&#232;res du graphique): apparition de martiens en vert, apparition de cas de rougeolle en rouge, etc. Ca aiderai pas mal &#224; s'y retrouver... 

En VBA bien sur...

econs · Accepted Answer

Salut,



Avec ceci, tu devrais trouver ton bonheur :


http://khany.developpez.com/tutoriel/mschart/


Manu
-------------------------------------------
Une question bien pos&#233;e, c'est une chance de r&#233;ponse bien adapt&#233;e.

turlututuchapopointu · Answer

Merci Manu. Sur ce coup l&#224;, tu g&#232;res comme un chef!

Paladin2107 · Answer

With Graph


    'Libell&#233;
    .Plot.Axis(VtChAxisIdX).AxisTitle.Text = "Abscisse"
    .Plot.Axis(VtChAxisIdX).AxisTitle.VtFont.Name = "Ms Comic"
    .Plot.Axis(VtChAxisIdX).AxisTitle.VtFont.Size = 14
    .Plot.Axis(VtChAxisIdX).AxisTitle.VtFont.VtColor.Set 0, 0, 100
    .Plot.Axis(VtChAxisIdY).AxisTitle.Text = "Ordonn&#233;"
    .Plot.Axis(VtChAxisIdY).AxisTitle.VtFont.Name = "Ms Comic"
    .Plot.Axis(VtChAxisIdY).AxisTitle.VtFont.Size = 14
    .Plot.Axis(VtChAxisIdY).AxisTitle.VtFont.VtColor.Set 0, 0, 100
    
    'Titre du graph
    .Title.Text = "Titre"
    .Title.VtFont.Name = "Ms comic"
    .Title.VtFont.Size = 16
    .Title.VtFont.VtColor.Set 0, 0, 100
    .Title.Location.LocationType = VtChLocationTypeTop
    .Title.Location.Visible = True
    
    'Legende
    .Plot.SeriesCollection(1).LegendText = "Nom"
    .Legend.Location.LocationType = VtChLocationTypeBottom
    .Legend.Location.Visible = True
    .Legend.VtFont.VtColor.Set 0, 0, 100
    .Legend.VtFont.Name = "MS Comic"
    .Legend.VtFont.Size = 14


   'Changer la couleur du graph
   .Plot.SeriesCollection(1).DataPoints(-1).Brush.FillColor.Set 45, 44, 78

End With
Couscous

turlututuchapopointu · Answer

J'ai jet&#233; un oeil sur developpez.com mais je n'arrive pas &#224; trouver ce qu'il me faut finallement.

Merci Paladin2107.
J'ai fait un essai avec ton code et j'ai un message d'erreur: Erreur '438': Propri&#233;t&#233; ou m&#233;thode non g&#233;r&#233;e par cet objet.
Il s'agit bien d'un graphique pourtant.
As-tu une id&#233;e de ce qui cloche?

turlututuchapopointu · Answer

Petites pr&#233;cisions:
Malgr&#233; que je l'ai nomm&#233; GraphPhenomAn, dans les propri&#233;t&#233;s de ce @#[&#167;@  graphique, il y a la propri&#233;t&#233; Classe objet: MSGraph.Chart.8.
Quelle est la diff&#233;rence entre MSChart et MSGraph?

Propriété des histogrammes: titre, couleur des barres...

5 réponses

Discussions similaires