Hallo Zusammen,
ich möchte innerhalb einer Schleife, Spaltenweise für jede Spalte die entsprechende Summe bilden.
Es ist sowohl die Spaltenanzahlen als auch die Zeile dynmaisch.
Mein Code schaut wie folgt aus:
letzteZeile = ActiveSheet.Cells(Rows.Count, 7).End(xlUp).Row
letzteSpalte = Cells(1, Columns.Count).End(xlToLeft).Column
Cells(letzteZeile + 2, 4) = "SUMME:"
' o dient als Spaltenzähler
For o = 5 To letzteSpalte
Cells(letzteZeile + 2, o).FormulaR1C1 = "=SUM(R2Co:RletzteZeileCo)"
Next
Leider funktioniert das Ganze nicht so, wie ich möchte. Wer kann mir helfen und sagen, was ich falsch mache?
Vielen Dank.
|