Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: Per VBA Leerzeile suchen + Zwischensummen bilden

Per VBA Leerzeile suchen + Zwischensummen bilden
05.11.2004 09:10:08
Heinz
Guten Morgen zusammen,
ich möchte gern die Spalte C ab der Zeile 9 nach unten durchlaufen und alle Werte bis zur nächsten Leerzeile aufaddieren lassen. Jetzt kommt das knifflige, das ganze soll nicht nur einmal, sondern insgesamt achtmal funktionieren. D.h. ich habe z.b. 160 Werte in Spalte C, die insgesamt durch 8 Leerzeilen getrennt sind (als Beispiel also jeweils 20 Werte pro Gruppe, können aber auch mal 10 und mal 30 sein!). Nun soll Excel die Leerzeilen suchen und jeweils bis zur nächsten Leerzeile die Summe über alle darin enthaltenen Werte bilden.
Hoffe, dass Ihr mich versteht ;-) etwas schwierig zu erklären!
Für jede Hilfe bin ich dankbar!
Gruß
Heinz
Anzeige

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Ergänzung
05.11.2004 09:14:24
Heinz
Die Zwischensummen sollen jeweils über der entsprechenden Gruppe erscheinen!!!
AW: Ergänzung
Ingolf
Hallo Heinz,
so müsste es gehen:

Sub Summieren()
Dim lng As Long, lngSumme As Long
For lng = Cells(Rows.Count, 1).End(xlUp).Row To 1 Step -1
If IsEmpty(Cells(lng, 1)) = True Then
Cells(lng, 1) = lngSumme
lngSumme = 0
Else
lngSumme = lngSumme + Cells(lng, 1)
End If
Next lng
End Sub

Gruß Ingolf
Anzeige
Ingolf, vielen Dank!!!! o.T.
05.11.2004 10:56:40
Heinz
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige