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.