neue Zeile mit SUMME-Funktion einfügen

Bild

Betrifft: neue Zeile mit SUMME-Funktion einfügen
von: Larissa
Geschrieben am: 24.06.2015 11:52:01

Hallo,
habe keine VGA Kenntnisse, versuche aber trotzdem
habe eine Liste, die so aussieht:
Stück Länge Paket-Nr. Gewicht Fläche
13 18360 101 2546 238
3 12360 101 395 37
14 18360 102 4236 397
würde gerne zwischen den unterschiedlichen Paket-Nr. eine neue Zeile einfügen, in der Gesamtgewicht und Gesamtfläche ausgerechnet werden
die Liste könnte danach so aussehen:
Stück Länge Paket-Nr. Gewicht Fläche
13 18360 101 2546 238
3 12360 101 395 37
SUMME 2941 275
14 18360 102 4236 397
SUMME 4236 397
würde mich über eine Antwort freuen

Bild

Betrifft: AW: neue Zeile mit SUMME-Funktion einfügen
von: AndrRo
Geschrieben am: 24.06.2015 11:55:35
Hallo Larissa,
Versuch mal Daten/Teilergebnis
genau das macht Teilergebnis
gruss
AndrRo

Bild

Betrifft: AW: neue Zeile mit SUMME-Funktion einfügen
von: Larissa
Geschrieben am: 24.06.2015 12:09:26
habe keine VBA-Kenntnisse
wie würde das in VBA aussehen

Bild

Betrifft: AW: neue Zeile mit SUMME-Funktion einfügen
von: AndrRo
Geschrieben am: 24.06.2015 12:19:33
Hallo Larissa,
das ist KEIN VBA:
Warum das Rad neu erfinden wenn es auch ohne geht:
Markiere die Tabelle.
Gehe oben im Menue auf Daten dann findest du Gruppieren / Gruppierung aufheben und TEILERGEBIS
Aktiviere TEILERGEBIS und stelle im Fenster folgendes ein:
Gruppieren nach: Paket.Nr.
Unter Verwendung von: SUMME
Teilerbenis addieren zu: Aktiviere GEWICHT und Fläche
Mit OK bestätigen!
ALLES OHNE VBA.
Gruss
AndrRo

Bild

Betrifft: AW: neue Zeile mit SUMME-Funktion einfügen
von: Larissa
Geschrieben am: 25.06.2015 08:17:48
Hallo AndrRo,
neu Zeile einfügen und die Summe einblenden soll per einen Knopfdruck funktionieren, deswegen
bräuchte ich dafür ein Macro
Paket-Nr. mit eine Summe-Zeile teilen und die Summe von Gewicht und Fläche ausrechnen
Gruß
Larissa

Bild

Betrifft: AW: neue Zeile mit SUMME-Funktion einfügen
von: AndrRo
Geschrieben am: 25.06.2015 10:56:19
Hallo Larissa,
Ich würde immer noch TEILERGNIS verwenden.
Der VBA Code dafür wäre:
Zeile i ist die Überschrift
Spalte 3 ist die Paketnummer
Spalte 4 Gewicht
Spalte 5 Fläche

Sub Makro1()
    Range("A1:E4").Select   'hier ist die Größer der Tabelle einzutragen
    Selection.Subtotal GroupBy:=3, Function:=xlSum, TotalList:=Array(4, 5), _
        Replace:=True, PageBreaks:=False, SummaryBelowData:=True
End Sub
Gruss
AndrRo

 Bild

Beiträge aus den Excel-Beispielen zum Thema "neue Zeile mit SUMME-Funktion einfügen"