Hi,
ich habe einen Soll / Ist vergleich. Wenn die Abweichung +- 5% ist, soll es gelb sein. Wenn es mehr als 5% ist, Rot. alles >+5% dann grün.
habe schon einen Code geschrieben. Allerdings bezieht sich dieser nur auf einen Tag.
Ist = Range("E6").Value
Soll = Range("E5").Value
Dim division
division = ((Ist - Soll) / Ist)
'Formel
If division < -0.05 Then
Range("E6").Interior.ColorIndex = 3
'rot
ElseIf division < 0.05 And division > -0.05 Then
Range("E6").Interior.ColorIndex = 6
'Gelb
ElseIf division > 0.05 Then
Range("E6").Interior.ColorIndex = 4
'Grün
End If
Wie kann man diesen umschreiben, dass er sich auf z.B. 30 Tage Soll / ist vergleich bezieht? Also jedes Mal neu rechnet, Farbe zuordnet und dann weiter springt
Liebe Grüße :)
|