bonjour,
lorsque je cré un graphique en VBA je n'arrive pas a changer la couleur de l'axe ordonné,
voici le code :
Sheets("Graphique").Activate
ActiveSheet.ChartObjects("Graphique2").Chart.Select
ActiveChart.Axes(xlValue).Select
With Selection.Format.TextFrame2.TextRange.Font.Fill
.Visible = msoTrue
.ForeColor.RGB = RGB(75, 230, 38)
.Transparency = 0
.Solid
End With
ActiveChart.Axes(xlValue, xlSecondary).Select
With Selection.Format.TextFrame2.TextRange.Font.Fill
.Visible = msoTrue
.ForeColor.RGB = RGB(75, 230, 38)
.ForeColor.TintAndShade = 0
.ForeColor.Brightness = 0
.Transparency = 0
.Solid
End With
merci pour aide car la je bloque compltement (de plus je remarque qu' apres la creation de mon graph lorsque je clique dessus toutes les options sont grisées..)
bonne soirée
lorsque je cré un graphique en VBA je n'arrive pas a changer la couleur de l'axe ordonné,
voici le code :
Sheets("Graphique").Activate
ActiveSheet.ChartObjects("Graphique2").Chart.Select
ActiveChart.Axes(xlValue).Select
With Selection.Format.TextFrame2.TextRange.Font.Fill
.Visible = msoTrue
.ForeColor.RGB = RGB(75, 230, 38)
.Transparency = 0
.Solid
End With
ActiveChart.Axes(xlValue, xlSecondary).Select
With Selection.Format.TextFrame2.TextRange.Font.Fill
.Visible = msoTrue
.ForeColor.RGB = RGB(75, 230, 38)
.ForeColor.TintAndShade = 0
.ForeColor.Brightness = 0
.Transparency = 0
.Solid
End With
merci pour aide car la je bloque compltement (de plus je remarque qu' apres la creation de mon graph lorsque je clique dessus toutes les options sont grisées..)
bonne soirée