Herbers Excel-Forum - das Archiv

Hallo Ihr Profis!
Wie kann ich folgende Formel in einer Excel Tabelle auf alle
Zeilen ab der sechsten anwenden, ohne sie tausende mal zu schreiben.

If Range("c6") = "50" Then Range("d6") = "RS"
If Range("c6") = "50" Then Range("J6") = (Range("F6") - Range("l6")) / 2
If Range("c6") = "50" Then Range("k6") = (Range("e6") - Range("l6")) / 2
If Range("c6") = "50" And Range("E6") + Range("F6") >= Pi * Range("L6") / 2 And Range("J6") >= Range("K6") _
Then Range("s6") = 2 * (Range("e6") + Range("f6")) * Sqr((Range("I6") ^ 2) + Range("j6") ^ 2) / 1000000 * Range("B6")
If Range("c6") = "50" And Range("E6") + Range("F6") < Pi * Range("L6") / 2 And Range("J6") <= Range("K6") _
Then Range("s6") = Pi * Range("L6") * Sqr((Range("I6") ^ 2) + (Range("k6") ^ 2)) / 1000000 * Range("B6")

Hallo Dietmar,

so gehte es:

Allerdings vermute ich, daß man die Formel selbst auch noch optimieren könnte. Dazu brauche ich aber mehr Information.

Gruß Klaus-Dieter
http://www.klaus-dieter-2000.de
(Excel und VBA speziell für Einsteiger)