ich verwende
If Application.Sum(Range("U" & gelb).Value, Range("AJ" & gelb).Value, Range("AV" & gelb).Value * 10, Range("BJ" & gelb).Value) >= 1000000 Then
um die Summe der 4 Zellen zu ermitteln. Leider kann eine oder mehrere leer sein. Um aus leer 0 zu machen, kam ich auf diese Lösung:
Range("Z10").FormulaR1C1 = "=SUM(PRODUCT(R2C21),PRODUCT(R2C36),PRODUCT(R2C48)*10,PRODUCT(R2C62))"
Allerdings will ich die Formel ja nicht in eine Zelle schreiben sondern nur prüfen, ob sie >= 1000000 ist.Meinetwegen kann die Formel auch eine Variable füllen, die ich dann auf >= 1000000 prüfe.
Gibt es eine geschicktere Lösung, wie ich die Summe der 4 Zellen errechnen kann, auch wenn manche leer sind?
Steh gerade aufm Schlauch.
Gruß
Joachim