ich würde gerne in Spalte Y die Summer der Spalten Q bis X erzeugen. Für alle befüllten Spalten.
Sub test()
Range(Cells(1, 6), Cells(Range("A1").End(xlUp).Row, 6)).FormulaR1C1 = "=SUM(RC[-8]:RC[-1])"
End Sub
bzw. macht es immer in Spalte F... Und wenn ich es versuche zu verstellen, dann summiert er von F nach die Spalten durch. Mir fehlt einfach das Wissen das obige Makro zu meinen Wünschen anzpusassen.
Sub Test_Summe()
Dim LR As Long, SP As Integer
SP = 25 'Zielspalte Y
With Sheets("Tabelle1")
LR = .Cells(.Rows.Count, SP - 8).End(xlUp).Row 'letzte Zeile der Spalte Q
.Cells(1, SP).Resize(LR, 1).FormulaR1C1 = "=SUM(RC[-8]:RC[-1])"
End With
End Sub
LG UweD