In diesem Beispiel werden positive und negative Abweichungsbalken für die erste Diagrammgruppe in Chart1 eingeblendet und die zugehörige Farbe festgelegt. Es ist sinnvoll, dieses Beispiel auf ein 2D-Liniendiagramm anzuwenden, das zwei Datenreihen beinhaltet, die sich in mindestens einem Datenpunkt schneiden.
With Charts("Chart1").ChartGroups(1)
.HasUpDownBars = True
.DownBars.Interior.ColorIndex = 3
.UpBars.Interior.ColorIndex = 5
End With