Comment masquer 1 courbe et ses marqueurs en prenant la couleur du fond ou
bien une couleur différente pour l'afficher.
anonymousA m'avait orienté vers la syntaxe suivante et aprés qqes modifs je
coule... :
With Graph.SeriesCollection(Courbe)
If Voir = 1 Then
.Interior.ColorIndex = Graph.PlotArea.Interior.ColorIndex
.Border.LineStyle = xlNone
.MarkerBackgroundColorIndex = xlAutomatic
.MarkerForegroundColorIndex = xlAutomatic
Else
.Interior.ColorIndex = xlNone
.Border.LineStyle = xlNone
.MarkerBackgroundColorIndex = 35
.MarkerForegroundColorIndex = Graph.PlotArea.Interior.ColorIndex
End If
End With
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
anonymousA
bonjour,
fait à la voléee
ActiveSheet.ChartObjects("Graphique 1").Activate ActiveChart.SeriesCollection(1).Select With Selection.Border .Weight = xlThin .LineStyle = xlNone End With With Selection .MarkerBackgroundColorIndex = ActiveChart.PlotArea.Interior.ColorIndex .MarkerForegroundColorIndex = ActiveChart.PlotArea.Interior.ColorIndex End With ActiveChart.SeriesCollection(1).Select With Selection.Border .LineStyle = xlNone End With
A+
Bonjour,
Comment masquer 1 courbe et ses marqueurs en prenant la couleur du fond ou bien une couleur différente pour l'afficher. anonymousA m'avait orienté vers la syntaxe suivante et aprés qqes modifs je coule... :
With Graph.SeriesCollection(Courbe) If Voir = 1 Then .Interior.ColorIndex = Graph.PlotArea.Interior.ColorIndex .Border.LineStyle = xlNone .MarkerBackgroundColorIndex = xlAutomatic .MarkerForegroundColorIndex = xlAutomatic Else .Interior.ColorIndex = xlNone .Border.LineStyle = xlNone .MarkerBackgroundColorIndex = 35 .MarkerForegroundColorIndex = Graph.PlotArea.Interior.ColorIndex End If End With
MERCI DE VOTRE AIDE
bonjour,
fait à la voléee
ActiveSheet.ChartObjects("Graphique 1").Activate
ActiveChart.SeriesCollection(1).Select
With Selection.Border
.Weight = xlThin
.LineStyle = xlNone
End With
With Selection
.MarkerBackgroundColorIndex = ActiveChart.PlotArea.Interior.ColorIndex
.MarkerForegroundColorIndex = ActiveChart.PlotArea.Interior.ColorIndex
End With
ActiveChart.SeriesCollection(1).Select
With Selection.Border
.LineStyle = xlNone
End With
A+
Bonjour,
Comment masquer 1 courbe et ses marqueurs en prenant la couleur du fond ou
bien une couleur différente pour l'afficher.
anonymousA m'avait orienté vers la syntaxe suivante et aprés qqes modifs je
coule... :
With Graph.SeriesCollection(Courbe)
If Voir = 1 Then
.Interior.ColorIndex = Graph.PlotArea.Interior.ColorIndex
.Border.LineStyle = xlNone
.MarkerBackgroundColorIndex = xlAutomatic
.MarkerForegroundColorIndex = xlAutomatic
Else
.Interior.ColorIndex = xlNone
.Border.LineStyle = xlNone
.MarkerBackgroundColorIndex = 35
.MarkerForegroundColorIndex = Graph.PlotArea.Interior.ColorIndex
End If
End With
ActiveSheet.ChartObjects("Graphique 1").Activate ActiveChart.SeriesCollection(1).Select With Selection.Border .Weight = xlThin .LineStyle = xlNone End With With Selection .MarkerBackgroundColorIndex = ActiveChart.PlotArea.Interior.ColorIndex .MarkerForegroundColorIndex = ActiveChart.PlotArea.Interior.ColorIndex End With ActiveChart.SeriesCollection(1).Select With Selection.Border .LineStyle = xlNone End With
A+
Bonjour,
Comment masquer 1 courbe et ses marqueurs en prenant la couleur du fond ou bien une couleur différente pour l'afficher. anonymousA m'avait orienté vers la syntaxe suivante et aprés qqes modifs je coule... :
With Graph.SeriesCollection(Courbe) If Voir = 1 Then .Interior.ColorIndex = Graph.PlotArea.Interior.ColorIndex .Border.LineStyle = xlNone .MarkerBackgroundColorIndex = xlAutomatic .MarkerForegroundColorIndex = xlAutomatic Else .Interior.ColorIndex = xlNone .Border.LineStyle = xlNone .MarkerBackgroundColorIndex = 35 .MarkerForegroundColorIndex = Graph.PlotArea.Interior.ColorIndex End If End With
