Hinweis
Für den Zugriff auf diese Seite ist eine Autorisierung erforderlich. Sie können versuchen, sich anzumelden oder das Verzeichnis zu wechseln.
Für den Zugriff auf diese Seite ist eine Autorisierung erforderlich. Sie können versuchen, das Verzeichnis zu wechseln.
Gibt bei Angabe einer Attributhierarchie ein implizites Maß für die angegebene Funktion zurück, das diesem Attribut entspricht. Wenn kein implizites Measure vorhanden ist, wird ein neues implizites Measure erstellt und der CubeFields-Auflistung hinzugefügt.
Syntax
Ausdruck verwendet werden. GetMeasure (AttributeHierarchy, Funktion, Beschriftung)
Ausdruck Eine Variable, die ein CubeFields-Objekt darstellt.
Parameter
| Name | Erforderlich/Optional | Datentyp | Beschreibung |
|---|---|---|---|
| AttributeHierarchy | Erforderlich | Variant | Das eindeutige Cubefeld, das eine Attributhierarchie darstellt (XlCubeFieldType = ,xlHierarchy und XlCubeFieldSubType = ,xlCubeAttribute). |
| Funktion | Erforderlich | XlConsolidationFunction | Die im hinzugefügten Datenfeld durchgeführte Funktion. |
| Caption | Optional | Variant | Die Bezeichnung, die im PivotTable-Bericht verwendet wird, um dieses Measure zu identifizieren. Wenn das Measure bereits vorhanden ist, überschreibt "Untertitel " das vorhandene Label dieses Measures. |
Hinweise
Das Abrufen eines Measures mithilfe der GetMeasure-Funktion funktioniert nur für diese Funktionen: Anzahl, Summe, Mittelwert, Max und Min.
Diese funktionieren zum Beispiel:
Get CubeField0 = modelPivotTable.CubeFields.GetMeasure("[customer].[num_cars_owned]", xlCount, "NumCarsOwnedCount")Set CubeField1 = modelPivotTable.CubeFields.GetMeasure("[customer].[num_cars_owned]", xlSum, "NumCarsOwnedSum")Set CubeField2 = modelPivotTable.CubeFields.GetMeasure("[customer].[num_cars_owned]", xlAverage, "NumCarsOwnedAverage")Set CubeField4 = modelPivotTable.CubeFields.GetMeasure("[customer].[num_cars_owned]", xlMax, "NumCarsOwnedMax")Set CubeField5 = modelPivotTable.CubeFields.GetMeasure("[customer].[num_cars_owned]", xlMin, "NumCarsOwnedMin")
Diese werden nicht funktionieren:
Set CubeField3 = modelPivotTable.CubeFields.GetMeasure("[customer].[num_cars_owned]", xlCountNums, "NumCarsOwnedCountNums")Set CubeField6 = modelPivotTable.CubeFields.GetMeasure("[customer].[num_cars_owned]", xlProduct, "NumCarsOwnedProduct")Set CubeField7 = modelPivotTable.CubeFields.GetMeasure("[customer].[num_cars_owned]", xlStDev, "NumCarsOwnedStDev")Set CubeField8 = modelPivotTable.CubeFields.GetMeasure("[customer].[num_cars_owned]", xlStDevP, "NumCarsOwnedStDevP")
Rückgabewert
CUBEFIELD
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.