XL 2010 Changer la mise en forme de point de données

noel33 · 27 Novembre 2018

Bonjour à tous,

je bloque sur un fichier, une jauge créé avec un graphique dans laquelle j'aimerai que mon curseur change de couleur en fonction de la valeur.
Dans l'exemple, j'aimerai que la valeur de l'aiguille "colle" aux couleurs de la jauge.

Si vous pouvez m'aider, ce serai extra...

D.D. · 29 Novembre 2018

Hello.

Essaye ceci dans THISWORKBOOK

Code:

Private Sub Workbook_SheetCalculate(ByVal Sh As Object)
    Valeur = Range("Feuil1!C7")
    Coul = RGB(0, 176, 80)
    If Valeur < 500 Then Coul = RGB(255, 192, 0)
    If Valeur < 200 Then Coul = RGB(255, 0, 0)
    Sheets("Feuil1").ChartObjects("Graphique 2").Chart.FullSeriesCollection(2).DataLabels.Format.TextFrame2.TextRange.Font.Fill.ForeColor.RGB = Coul

End Sub

(Modif à 9:53 pour éviter la perte du focus. Pour la transition Orange - Vert, valeur à adapter (à priori plutôt 700))

noel33 · 29 Novembre 2018

Extra,

merci du coup de main!

N.

XL 2010 Changer la mise en forme de point de données

noel33

XLDnaute Occasionnel

Pièces jointes

D.D.

XLDnaute Impliqué

noel33

XLDnaute Occasionnel

Discussions similaires

XL 2010 Changer la mise en forme de point de données

noel33

XLDnaute Occasionnel

Pièces jointes

D.D.

XLDnaute Impliqué

noel33

XLDnaute Occasionnel

Discussions similaires

Privacy & Transparency

Privacy & Transparency