Freigeben über


Range.Subtotal-Methode (Excel)

Erstellt Teilergebnisse für den Bereich (bzw. für die aktuelle Region, wenn der Bereich nur aus einer Zelle besteht).

Syntax

Ausdruck. Teilergebnis (GroupBy, Function, TotalList, Replace, PageBreaks, SummaryBelowData)

Ausdruck Eine Variable, die ein Range-Objekt darstellt.

Parameter

Name Erforderlich/Optional Datentyp Beschreibung
GroupBy Erforderlich Long Das Feld, nach dem gruppiert werden soll, als ganzzahliger, bei 1 beginnender Versatz (Offset). Weitere Informationen hierzu finden Sie im Beispiel.
Funktion Erforderlich XlConsolidationFunction Die Zwischensumme-Funktion.
TotalList Erforderlich Variant Ein Array mit bei 1 beginnenden Feldversätzen. Diese geben die Felder an, denen die Zwischensummen hinzugefügt werden. Weitere Informationen finden Sie im Beispiel.
Replace Optional Variant Mit True werden bestehende Teilergebnisse ersetzt. Der Standardwert ist True.
PageBreaks Optional Variant Mit True wird nach jeder Gruppe ein Seitenumbruch eingefügt. Der Standardwert ist False.
SummaryBelowData Optional XlSummaryRow Platziert die Zusammenfassungsdaten relativ zur Zwischensumme.

Rückgabewert

Variant

Beispiel

In diesem Beispiel werden Zwischensummen für den ausgewählten Bereich in Sheet1 erstellt. Es handelt sich hierbei um Summen, die nach jeder Änderung im ersten Feld gruppiert werden. Die Teilergebnisse werden im zweiten und dritten Feld hinzu addiert.

Worksheets("Sheet1").Activate 
Selection.Subtotal GroupBy:=1, Function:=xlSum, _ 
 TotalList:=Array(2, 3)

Support und Feedback

Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.