Subtotal nach zwei Werten

Forumthread: Subtotal nach zwei Werten
1 Beitrag zu diesem Forumthread
Anzeige

Forumthread: Subtotal nach zwei Werten

20.01.2004 12:47:03

Markus

Hallo,
ich möchte gerne Subtotals nach zwei verschiedenen werten einfügen.
Über den "Subtotals" Menüpunkt unter "DATA" kann ich diese jedoch nur ausführen wenn sich ein Wert unterscheidet. und eine nachträgliche Subtaltal wirft meine erste ja komplett über den Haufen.
Beispiel: Hier erfolgt das Subtotal nach einer Unterscheidung in Spalte 3, ich benötige jedoch noch zusätzlich eine Unterscheidung nach Spalte 5


Sub Subtotals()
Cells.Select
Selection.Subtotal GroupBy:=(3) Function:=xlSum, TotalList:=Array(4, 6, 7, 8, _
9), Replace:=True, PageBreaks:=False, SummaryBelowData:=True
End Sub

Viele Grüße
Markus

1
Beitrag zum Forumthread

Beitrag zu diesem Forumthread

Betreff

Datum

Anwender

AW: Subtotal nach zwei Werten

20.01.2004 15:09:09

Derselbe

AW: Subtotal nach zwei Werten

20.01.2004 15:09:09

Derselbe

Habe es mittlerweile gelöst... ist zwar nicht wirlich optimal doch es läuft


Sub Subtotals()
Cells.Select
Selection.Subtotal GroupBy:=(3) Function:=xlSum, TotalList:=Array(4, 6, 7, 8, _
9), Replace:=True, PageBreaks:=False, SummaryBelowData:=True
Selection.Subtotal GroupBy:=(5) Function:=xlSum, TotalList:=Array(4, 6, 7, 8, _
9), Replace:=False, PageBreaks:=False, SummaryBelowData:=True
End Sub

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!