Live-Forum - Die aktuellen Beiträge
Datum
Titel
16.10.2025 18:38:17
Zusammenfassung nach Personalnummer
16.10.2025 17:40:39
Rabattstafel
16.10.2025 17:25:38
bedingte Formatierung
16.10.2025 16:39:53
Ergebnisse nach rechts ausgeben
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
768to772
768to772
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Summe

Forumthread: Summe

Summe
09.06.2006 14:51:03
Phil
Hallo Experten,
ich versuche gerade eine Spalte aufzusummieren. Ich möchte dabei alle Zeilen oberhalb des Summenfeldes einbeziehen, bis zu einem andersfarbigen feld, also
4
3
feld-blau
3
4
5
Summe = 12
Kann ich eine solche Bedingung in mein Makro einbauen? Danke im Voraus
Gruss,
Philip
Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Summe
09.06.2006 15:50:11
fcs
Hallo Philip,
hier ein Beispiel-Makro

Sub Summe()
Application.ScreenUpdating = False
With ActiveSheet.Cells(7, "A") 'Zelle in der Summe berechnet werden soll
i = -1
Farbe = .Offset(i, 0).Interior.ColorIndex 'Farbe in Zelle oberhalb Summenzelle
Do Until .Offset(i, 0).Interior.ColorIndex <> Farbe
If .Offset(i, 0).Row = 1 Then Exit Do '1. Zeile wurde ereicht
i = i - 1
Loop
.Value = Application.WorksheetFunction.Sum(Range(.Offset(i, 0), .Offset(-1, 0)))
End With
Application.ScreenUpdating = True
End Sub

mfg
Franz
Anzeige
AW: Summe
12.06.2006 16:37:29
Philip
Hallo Franz,
Verspätetes aber aufrichtiges Dankeschön!
Hat super geklappt!
Gruss,
Philip
;

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
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