Live-Forum - Die aktuellen Beiträge
Datum
Titel
26.09.2025 18:34:36
Welches Datum gibt mein M-Code aus?
26.09.2025 10:29:46
Wert aus einer Zelle bei jeder Eingabe in neue Zelle
26.09.2025 08:51:00
Teilinhalt einer Zelle vergleichen
25.09.2025 23:04:12
Einen von drei möglichen Einträgen in einer Zeile suchen
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
360to364
360to364
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Aufsummierung der Spaltenwerte mit VBA

Forumthread: Aufsummierung der Spaltenwerte mit VBA

Aufsummierung der Spaltenwerte mit VBA
09.01.2004 09:16:46
Markus Kl
Hallo Forum,
ich wende mich mit meiner Frage von gestern noch einmal an euch.
Ich habe eine Tabelle, die nach zwei Spalten sortiert wird und möchte eine Aufsummierung der Werte haben sobald sich die sortierten Werte ändern.
Z.B. sortiere ich eine Spalte nach Ländern und innerhalb dieser Länder sortiere ich nach Herstellern (jeweils verschiedene Spalten). Jetzt habe ich noch eine Spalte in der der Umsatz steht und diesen Umsatz möchte ich nach jedem Hersteller aufsummiert haben.
Ich möchte das ganze jedoch nicht über eine Pivot Tabelle lösen, sondern möchte das gerne in einem Makro realisieren.
Besten Dank
Markus
Anzeige

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Aufsummierung der Spaltenwerte mit VBA
09.01.2004 21:33:16
Beni
Hallo Markus,
da Du keine Spalten angegeben hast, ist es nicht möglich etwas konkretes zu programieren.
In diesem Beispiel sind die Hersteller in Spalte B, die Umsätze in Spalte C und Summen werden in Spalte D geschrieben.
Gruss Beni

Sub summieren()
Summe = 0
For r = 1 To Cells(65536, 2).End(xlUp).Row
Summe = Summe + Cells(r, 3).Value
If Cells(r, 2) <> Cells(r + 1, 2) Then
Cells(r, 4) = Summe
Summe = 0
End If
Next r
End Sub

Anzeige
;

Forumthreads zu verwandten Themen

VBA - Summe unter letzter Zeile bilden
mgr

hallihallo!
ich hab jetzt schon ziemlich lang rumgesucht, komm aber leider nicht zum durchbruch. dabei - so unterstelle ich - hab ich ein problem, das schon viele gehabt haben müssten und das wahrscheinlich auch nicht unlösbar ist.
ich habe eine tabelle mit einer variablen anzahl von ze...
07.11.2008 13:39:07
Thread-ID: 1022657
3 Beiträge
Dynamische Summe ohne VBA
Matthias

Hallo,
habe folgendes Problem:
Auf einem Excel Blatt werden immer nur die letzen 31 Tage berechnet, eine Spalte soll aber einen kumulierten Wert übder das ganze Jahr erhalten. Wie bekommt man es ohne Makro hin, das er nach dem gegenwärtigen Datum der Zeile schaut, sich selbiges auf der...
25.11.2008 08:54:00
Thread-ID: 1027559
2 Beiträge
Anzeige
VBA Resume vier mal, dann Resume next
MBorn

Hallöle,
gibt es eigentlich sowas wie in der Überschrift beschrieben:
Resume 4 times: versuche das gleiche vier mal
Wenn es 4 x nicht klappt dann
Resume next: mach weiter
Ich hab noch nichts dazu gefunden, ihr vielleicht?
Danke,
Born
31.01.2009 16:52:00
Thread-ID: 1045686
6 Beiträge
Anzeige
WorksheetFunktion.Sum auf Range beschränken.
Chris


Hallo
Der untere Code läuft soweit perfekt, wären nicht noch andere Eingabefelder in der Umbgebung.
Sobald ich in eine Andere Zelle gehen als die von den Range A2:A30 und A50:A80 kommt auch dann
die Meldung. Ich glaube das hängt mit dem Sheet zusammen.
Kann man die Workshe...
08.02.2009 20:12:00
Thread-ID: 1048456
6 Beiträge
Anzeige
Spezialsumme VBA
Michi

Guten Morgen!
Ich habe eine ergänzende Frage zu einem Problem, das ich hier bereits gepostet hatte. Ich konnte den Thread nicht mehr aus dem Archiv zum Leben erwecken. Bitte verzeiht mir das.
Das Problem war hier beschrieben.
https://www.herber.de/forum/archiv/1044to1048/t1045492.h...
11.02.2009 10:42:00
Thread-ID: 1049477
8 Beiträge
| HERBERS Excel Forum
kai

hallo zusammen,
ich würde gerne per makro die letzten beiden beschriebenen zellen der spalte h löschen?
würde mich freuenn, wenn mir das jemand kurz aufschreiben könnte.
danke und viel grüße kai
26.04.2009 19:51:39
Thread-ID: 1071220
6 Beiträge
Summe bestimmter Werte in einer Spalte
Michael

Hallo zusammen,
bin neu hier und hätte eine Frage bezüglich der Berechnung einer Summe. Folgendes Szenario: Ich möchte in B1 eine Summe berechnen aus Werten der B Spalte. Soweit klar! Die einzelnen Werte in Spalte B werden in jeder Zeile mit einem Wert aus der A Spalte "nebenan" berechnet....
17.06.2009 20:47:04
Thread-ID: 1082369
2 Beiträge
Anzeige
Array Formel summe wenn in VBA umwamdeln
t.wegmann@hengegroup.com

Hallo Liebes Forum,
ich habe ein Problem mit meiner Array-Formel:
=SUMME(WENN(('DATEN NEU'!$F$2:$F$25048=Frachten!$D4)*('DATEN NEU'!$N$2:$N$25048=Frachten!$F4) *('DATEN NEU'!$X$2:$X$25048=Frachten!H$2);'DATEN NEU'!$AB$2:$AB$25048))
Die Formel funktioniert gut, nur wenn ich die Date...
01.03.2010 09:54:52
Thread-ID: 1142293
2 Beiträge
ArraySumme von ABS Werten in VBA
ABS

Hallo Excel Freunde,
ich stehe gerade bei einer vermutlich banalen Sache auf der langen Leitung.
{=SUMME(ABS(A6:G6)) } Diese ArrayFormel bildet die Summe aller Einzelzellen von A6-G6 aus ihren individuellen ABS Werten.
Wie lautet diese Zeile in VBA, wenn testweise A6-G6 die Selectio...
10.03.2010 20:52:23
Thread-ID: 1144997
4 Beiträge
VBA Summenprodukt-Wochentag Typen unverträglich
Alfons

Hallo,
in Spalte A stehen die Tage: 01.02.2010, 02.02.2010 usw.
Zellformat ist Standard.
Mit VBA will ich davon die Anzahl der Montage ermitteln.
Dim rng As Range
Set rng = Range("A2:A65000")
MsgBox WorksheetFunction.SumProduct((Weekday(rng, 2) = 1) * 1)
Warum kommt...
29.03.2010 07:12:46
Thread-ID: 1148988
11 Beiträge
VBA Sumproduct dynamisch
Peter.H

Hallo zusammen
ich bekomme in der nachfolgenden Formel den Teil *** "=""BMW"" *** nicht über eine Variable zugewiesen.
Hier mein Code:
Sub SummenproduktFunktioniert() Dim iCol%: iCol = 3 Dim iLz%: iLz = Cells(Cells.Rows.Count, 1).End(xlUp).Row Dim mon%: mon = 2 With wsSP .[F1] = Eva...
25.07.2010 20:03:23
Thread-ID: 1168796
3 Beiträge
vba SUMPRODUKT und Anführungszeichen
Alfons

Hallo,
es soll eine Collection mit Firmen durchlaufen und die passenden Werte
aus Spalte H-K mit SUMPRODUKT addiert werden.
Problem: enthält der Firmenname Anführungszeichen, liefert SUMPRODUKT #WERT.
Set rngFirmen = ActiveSheet.Range("B2:B" & lngLZ)
Set rngAE = ActiveSh...
30.07.2010 10:47:16
Thread-ID: 1169611
3 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken

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