XL 2019 couleur de bordure de point sur un graphique

Sheldor

XLDnaute Occasionnel
Supporter XLD
bonjour à toutes et tous,

je souhaite utiliser une échelle de couleur située dans des cellules (colonne J) pour colorier mes points dans un graphique

J'ai 11 couleurs, une couleur par série

colorier l'intérieur du point ça m'a l'air ok mais il y a une bordure autour du point que je n'arrive ni à enlever ni à colorer de la même couleur que le point...

mon code en pj

très grand merci d'avance et excellente journée

nico
 

Pièces jointes

  • temp_question_couleur_graph.xlsm
    22.9 KB · Affichages: 4

Sheldor

XLDnaute Occasionnel
Supporter XLD
bonjour Chris,
merci pour ta réponse

j'ai remplacé ainsi:

For compteur = 1 To 11

ActiveChart.SeriesCollection(compteur).MarkerStyle = 1
ActiveChart.SeriesCollection(compteur).MarkerSize = 10
ActiveChart.SeriesCollection(compteur).Format.Fill.ForeColor.RGB = Cells(compteur + 1, 10).Interior.Color
'ActiveChart.SeriesCollection(compteur).Format.Line.ForeColor.RGB = Cells(compteur + 1, 10).Interior.Color
ActiveChart.SeriesCollection(compteur).Format.Line.Visible = msoFalse
Next compteur

mais je ne vois aucun changement
 
Dernière édition:

chris

XLDnaute Barbatruc
RE

Manifestement il y a un bug

Contournement en jouant sur la transparence
VB:
Sub Bouton1_Cliquer()

ActiveSheet.ChartObjects("Graphique 20").Activate
    
For compteur = 1 To 11
    With ActiveChart.SeriesCollection(compteur)
        .MarkerStyle = 1
        .MarkerSize = 10
        .Format.Fill.ForeColor.RGB = Cells(compteur + 1, 10).Interior.Color
        .Format.Line.Transparency = 1
    End With
Next compteur

End Sub
 

Sheldor

XLDnaute Occasionnel
Supporter XLD
merci beaucoup Chris,

quand tu dis il y a un "bug" ça veut dire que c'est au niveau d'excel qu'il y a eu un truc qui a été raté par les développeurs et que ça ne vient pas juste de nos deux ordis où ça marche pas ?

je m'étais arraché les cheveux avec la transparence il y a quelques temps du coup je n'ai pas tenté cette piste

bravo, encore merci

nico
 

chris

XLDnaute Barbatruc
RE

J'ai 365 et toi 2019 et on fait le même constat donc c'est bien un bug MS jusqu'à preuve du contraire.


A tester
MarkerForegroundColorIndex = -4142
 
Dernière édition:

Discussions similaires

Statistiques des forums

Discussions
312 911
Messages
2 093 509
Membres
105 744
dernier inscrit
laure.mg