Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
912to916
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
912to916
912to916
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Teilergebnisse für erste Zahl

Teilergebnisse für erste Zahl
03.10.2007 18:35:00
master
Hallo,
ich möchte für eine mehrstellige Zahl immer eine Gruppierung nach der ersten Zahl ein Teilergebniss haben.
Mit Daten/Teilergebnisse Gruppiert er mir alle mehrstellige Zahlen mit den den einzelnen Gruppen.
Tabelle1

 ABC
1NrProduktGesamt
25100Produkt 1   8.587,00 €
35101Produkt 2   4.700,00 €
45102Produkt 3   2.760,00 €
55103Produkt 4   3.824,00 €
65104Produkt 5   1.390,00 €
75104Produkt 6   1.107,00 €
85104Produkt 7   1.806,00 €
95105Produkt 6   9.170,00 €
105105Produkt 7   8.850,00 €
115105Produkt 6   3.810,00 €
12Teilergebnis  46.004,00 €
136501Produkt 6      319,00 €
146501Produkt 7   3.185,00 €
156502Produkt 6   9.448,00 €
166503Produkt 7   3.644,00 €
176504Produkt 6   7.378,00 €
18Teilergebnis  23.974,00 €

Formeln der Tabelle
ZelleFormel
C12=TEILERGEBNIS(9;C2:C11)
C18=TEILERGEBNIS(9;C13:C17)


Excel Tabellen im Web darstellen >> Excel Jeanie HTML 4
Danke im voraus!

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Teilergebnisse für erste Zahl
03.10.2007 20:08:50
master
Habe eine Lösung für mich gefunden!
Tabelle1

 ABCD
1ZahlNrProduktGesamt
255100Produkt 1   8.587,00 €
355101Produkt 2   4.700,00 €
455102Produkt 3   2.760,00 €
555103Produkt 4   3.824,00 €
655104Produkt 5   1.390,00 €
755104Produkt 6   1.107,00 €
855104Produkt 7   1.806,00 €
955105Produkt 6   9.170,00 €
1055105Produkt 7   8.850,00 €
1155105Produkt 6   3.810,00 €
125 Ergebnis   46.004,00 €
1366501Produkt 6      319,00 €
1466501Produkt 7   3.185,00 €
1566502Produkt 6   9.448,00 €
1666503Produkt 7   3.644,00 €
1766504Produkt 6   7.378,00 €
186 Ergebnis   23.974,00 €
19Gesamtergebnis   69.978,00 €

Formeln der Tabelle
ZelleFormel
A2=TEIL(B2;1;1)
A3=TEIL(B3;1;1)
A4=TEIL(B4;1;1)
A5=TEIL(B5;1;1)
A6=TEIL(B6;1;1)
A7=TEIL(B7;1;1)
A8=TEIL(B8;1;1)
A9=TEIL(B9;1;1)
A10=TEIL(B10;1;1)
A11=TEIL(B11;1;1)
D12=TEILERGEBNIS(9;D2:D11)
A13=TEIL(B13;1;1)
A14=TEIL(B14;1;1)
A15=TEIL(B15;1;1)
A16=TEIL(B16;1;1)
A17=TEIL(B17;1;1)
D18=TEILERGEBNIS(9;D13:D17)
D19=TEILERGEBNIS(9;D2:D17)


Excel Tabellen im Web darstellen >> Excel Jeanie HTML 4

Anzeige
AW: Teilergebnisse für erste Zahl
03.10.2007 20:24:00
Beate
Hallo,
wenn du die Hilfsspalte D mit folgender Formel einfügst, kannst du für deinen Zweck Teilergebnis > Menü einsetzen, die Formel aus D2 kannst du vor dem Gruppieren runterkopieren:
 ABCD
1NrProduktGesamtHilfspalte
25100Produkt 18.587,00 €5
35101Produkt 24.700,00 €5
45102Produkt 32.760,00 €5
55103Produkt 43.824,00 €5
65104Produkt 51.390,00 €5
75104Produkt 61.107,00 €5
85104Produkt 71.806,00 €5
95105Produkt 69.170,00 €5
105105Produkt 78.850,00 €5
115105Produkt 63.810,00 €5
12  46.004,00 €5 Ergebnis
136501Produkt 6319,00 €6
146501Produkt 73.185,00 €6
156502Produkt 69.448,00 €6
166503Produkt 73.644,00 €6
176504Produkt 67.378,00 €6
18  23.974,00 €6 Ergebnis
19  69.978,00 €Gesamtergebnis

Formeln der Tabelle
ZelleFormel
D2=GANZZAHL(A2/1000)

Gruppieren nach: Hilfsspalte
Unter Verwendung von: Summe
Teilergebnis addieren zu: Gesamt anhaken
Gruß,
Beate

Anzeige
AW: Teilergebnisse für erste Zahl
03.10.2007 20:43:00
master
Hallo nochmal,
habe das ganze jetzt aufgezeichnet mit Makro.
Möchte die Zellen die in Spalte A mit diesem Makro ausgefüllt bekommen.
Da Liste unterschiedlich lang sind.
Was muß ich in dem Makro ändern.
Sub Teilerg() ActiveCell.Columns("A:A").EntireColumn.Select Selection.Insert Shift:=xlToRight ActiveCell.Select ActiveCell.FormulaR1C1 = "Zahl" ActiveCell.Offset(1, 0).Range("A1").Select ActiveCell.FormulaR1C1 = "=MID(RC[1],1,1)" ActiveCell.Select Selection.AutoFill Destination:=ActiveCell.Range("A1:A20") ActiveCell.Range("A1:A20").Select Selection.Copy Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _ :=False, Transpose:=False Application.CutCopyMode = False End Sub


Anzeige
AW: Teilergebnisse für erste Zahl
03.10.2007 21:29:00
Beate
Hallo,
probiere mal dieses Makro, es ist zeilendynamisch:
Sub Teilerg()
    If Range("A1").Value = "Zahl" Then Columns("A:A").Delete Shift:=xlToLeft
    Columns("A:A").Insert Shift:=xlToRight
    Range("A1").Value = "Zahl"
    Range("A2:A" & Cells(65536, 2).End(xlUp).Row).FormulaR1C1 = "=MID(RC[1],1,1)*1"
    Range("A2:A" & Cells(65536, 2).End(xlUp).Row).Copy
    Range("A2:A" & Cells(65536, 2).End(xlUp).Row).PasteSpecial Paste:=xlPasteValues
    Columns("B:B").Copy
    Columns("A:A").PasteSpecial Paste:=xlPasteFormats
    Application.CutCopyMode = False
    Range("A1").Select
End Sub

Gruß,
Beate

Anzeige
AW: Teilergebnisse für erste Zahl
03.10.2007 21:35:43
master
Super!!
Danke!!

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige