Summe mit For-Schleife
28.08.2004 20:39:48
Viola
sitze jetzt seit Stunden an einem Makro und krieg es einfach nicht hin. Ich habe viele Spalten nebeneinander (dynamisch generiert; Anzahl der Spalten verändert sich). In einem neuen Sheet möchte ich jetzt jeweils Zwischensummen für jede Spalte berechnen lassen. Exemplarisch für die erste Spalte im neuen Sheet:
Zelle 1: A1
Zelle 2: A1 + A2
Zelle 3: A1 + A2 + A3
usw...
Mein Code sieht folgendermaßen aus: (für 1. Spalte habe 2. For Schleife damit jede Spalte durchlaufen wird=
For r = 1 To Reihen - 1 Step 1
With CARs
.Cells(r + 6, s + 3).Select
ActiveCell.FormulaR1C1 = "=SUM(Range(Cells(1,1),Cells(r,1))"
End With
Next r
Ich habe alles definiert usw. Aber trotzdem meckert er bei "=Sum...".
Wie lautet der richtige Syntax???
Vielen lieben Dank
Viola