kann mir jmd von euch sagen, warum hier keiner der Fälle ausgewählt wird?
Dim budget_insg As Integer
Dim budget_ohne_rp As Integer
Dim rp As Integer
Dim verbraucht As Integer
verbraucht = Range("L5").Value
budget_ohne_rp = Tabelle12.Range("D13").Value
rp = Tabelle12.Range("E13").Value
budget_insg = Tabelle12.Range("F13").Value
Select Case verbraucht
Case verbraucht < budget_ohne_rp
Tabelle5.Range("P11").Value = "grün"
Case verbraucht >= (budget_ohne_rp * 0.85) 'Hier sind erst mal 85% des Budgets gewählt
Tabelle5.Range("P11").Value = "gelb"
Case verbraucht >= budget_ohne_rp
Tabelle5.Range("P11").Value = "orange"
Case verbraucht >= budget_insg
Tabelle5.Range("P11").Value = "rot"
End Select
End Sub
Bsp.Werte:
verbraucht = 5
budget_ohne_rp = 100
rp = 15
budget_insg = 115
da 5 < 100 sollte er ja eigentlich in die Zelle grün schreiben, jedoch läuft er einfach durch ohne iwas zu machen... egal welche werte eingestellt sind
BG,
Seb