PivotCell.CustomSubtotalFunction-Eigenschaft (Excel)

Gibt die Einstellung für ein benutzerdefiniertes Feld mit Zwischenergebnisfunktion eines PivotCell-Objekts zurück. Schreibgeschützter XlConsolidationFunction-Wert.

Syntax

Ausdruck. CustomSubtotalFunction

Ausdruck Eine Variable, die ein PivotCell-Objekt darstellt.

Hinweise

Die CustomSubtotalFunction-Eigenschaft gibt einen Fehler zurück, wenn der PivotCell-Objekttyp kein benutzerdefiniertes Teilergebnis ist. Diese Eigenschaft gilt nur für Nicht-OLAP-Quelldaten.

Beispiel

In diesem Beispiel wird ermittelt, ob Zelle C20 eine benutzerdefinierte Teilergebnisfunktion enthält, die eine Konsolidierungsfunktion von count verwendet, und dann wird der Benutzer benachrichtigt. Es wird angenommen, dass im aktiven Arbeitsblatt eine PivotTable vorhanden ist.

Sub UseCustomSubtotalFunction() 
 
 On Error GoTo Not_A_Function 
 
 ' Determine if custom subtotal function is a count function. 
 If Application.Range("C20").PivotCell.CustomSubtotalFunction = xlCount Then 
 MsgBox "The custom subtotal function is a Count." 
 Else 
 MsgBox "The custom subtotal function is not a Count." 
 End If 
 Exit Sub 
 
Not_A_Function: 
 MsgBox "The selected cell is not a custom subtotal function." 
 
End Sub

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.