ich habe zwei Spalten! In Spalte A steht ein Soll-Wert in B ein Ist-Wert!
Kann ich die Balken aus Spalte B so einfärben wie sie vom Soll-Wert abweichen?
Also unter Soll rot über Soll grün?
Gruß
Sub ColorByValue()
Dim rPatterns As Range
Dim iPattern As Long
Dim iPoint As Long
Dim vValues As Variant
Dim rValue As Range
With ActiveSheet
Set rPatterns = .Range("A17:A21")
With .ChartObjects("Chart 2").Chart.SeriesCollection(1)
vValues = .Values
For iPoint = 1 To UBound(vValues)
For iPattern = 1 To rPatterns.Count
If vValues(iPoint)
Gruß