hallo,
ich möchte in excel mit vba zwischensummen generieren. in spalte 8 sind zahlen eingetragen, wobei einzelne zellen dazwischen leer sind. in diese Leerzellen sollen nun die summe der obigen zahlen eingetragen werden. das ganze soll natürlich so lange sattfinden, bis keine zahlen mehr vorhanden sind
mein "programm" schaut wie folgt aus:
For i =1 to 1136
If cells(i, 8).Value = emtpy Then
cells(i, 8) = x
x = 0
Else: x = (x + cells(i, 8).Value)
End If
Das problem liegt im schleifenkopf....
wie schreibe ich dass denn, dass das programm nur solange addieren soll, bis keine zahlen mehr vorhanden sind....
i=cells(Rows.count,8).End(xlDown)...?
Außerdem noch mal ne kurze frage...
wenn ich einzelne SPALTEN, die in zeile 3 alle leer sind, löschen will, wie mache ich das?
Vielen Dank,
GREETZ
LUKE