Discussion :

[pierrepelerin]

Bonjour !

Débutant en VBA, je m'entraîne à programmer de petites applications.

J'ai un histogramme qui représente différentes notes. Je voudrais que la barre correspondant à la matière soit rouge pour les notes en dessous de 5, orange entre 5 et 10, jaune entre 10 et 15 et verte au dessus de 15. Mon problème est que la mééthode pour savoir quelle note sera prise en compte dans l'histogramme est assez complexe (elles ne se suivent pas) et après la création de l'histogramme, il n'y a plus de lien direct entre l'histogramme et les données. J'aimerais donc connaître la valeur d'un point de l'histogramme sans passer par la feuille de calcul (changer la couleur d'une barre ne pose pas de problème).

Code :

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

1
2
3
    If ActiveChart.SeriesCollection(1).Points(1).??????????? < 5 Then
        ActiveChart.SeriesCollection(1).Points(1).Interior.ColorIndex = 3
    End If

Je voudrais savoir par quoi remplacer ???????... J'ai cherché sur Internet mais je n'ai pas trouvé...

Merci d'avance pour votre aide !

A bientôt !

Pierre P.

[ArthurO0O]

Code :

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

1
2
3
If ActiveChart.SeriesCollection(1).Points(1).Value < 5 Then
 ActiveChart.SeriesCollection(1).Points(1).Interior.ColorIndex = 3
End If

Essaie cela à mon avis... "Value"

[pierrepelerin]

Merci de ta réponse, c'est aussi ce que je me disais mais il m'affiche :

Erreur d'exécution '438':
Propriété ou méthode non gérée par cet objet

Au pire je mettrai les valeurs de l'histogramme dans un tableau en le créant, mais j'aimerais quand même savoir par curiosité s'il n'y a pas de possibilité de conna^tre la valeur de mes points...

[ArthurO0O]

A mon avis le probleme est que ton point n'est pas défini par 1 valeur mais par des coordonnées... Il fautdrait donc plutôt que "Value" un truc genre "Abscisse" ou "Ordonnée" (enfin, ca c'est en FR, pas en VBA...)

[cb_60]

Bonsoir
Pourquoi ne construit tu pas un tableau secondaire avec toutes tes conditions et prendre ce tableau pour la réalisation du graphique

[pierrepelerin]

Bonsoir,

Je vais suivre ton idée cb_60 et faire un tableau dans lequel je puiserai les renseignements recherchés...

Toutefois, si l'un de vous trouve une solution plus "graphique", cela m'intéresse !

ArthurO0O : c'est vrai que je n'avais pas pensé à ça, tu as surement raison ! Mais j'ai 2 problèmes :
- Les données étant présentées sous forme d'histogramme, le premier "baton" aurait une abscisse de 1, le 2deuxième de 2, etc ?
- Je n'ai pas réussi à trouver sur internet la fonction pour trouver l'ordonnée d'un point dont on a l'abscisse... Si quelqu'un la connait...