CubeFields.GetMeasure-Methode (Excel)
Gibt bei einer Attributhierarchie ein implizites Measure für die angegebene Funktion zurück, die diesem Attribut entspricht. Wenn kein implizites Measure vorhanden ist, wird ein neues implizites Measure erstellt und der CubeFields-Auflistung hinzugefügt.
Syntax
Ausdruck. GetMeasure (AttributeHierarchy, Function, Caption)
Ausdruck Eine Variable, die ein CubeFields-Objekt darstellt.
Parameter
| Name | Erforderlich/Optional | Datentyp | Beschreibung |
|---|---|---|---|
| AttributeHierarchy | Erforderlich | Variant | Das eindeutige Cubefeld, das eine Attributhierarchie ist (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 Caption die vorhandene Bezeichnung dieses Measures. |
Hinweise
Das Abrufen eines Measures mithilfe der GetMeasure-Funktion funktioniert nur für die folgenden Funktionen: Count, Sum, Average, Max und Min.
Dies funktioniert z. B. wie folgt:
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")
Dies funktioniert nicht:
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.