In diesem Beispiel werden für die Füllung des Diagrammbereichs im ersten Diagramm Vordergundfarbe, Hintergrundfarbe und Farbverlauf festgelegt.
With Charts(1).ChartArea.Fill .Visible = True .ForeColor.SchemeColor = 15 .BackColor.SchemeColor = 17 .TwoColorGradient msoGradientHorizontal, 1 End With