Método CubeFields.GetMeasure (Excel)
Dada una jerarquía de atributos, devuelve una medida implícita para la función especificada que corresponde a este atributo. Si no existe una medida implícita, se crea una nueva medida implícita y se agrega a la colección CubeFields .
Sintaxis
expresión. GetMeasure (AttributeHierarchy, Function, Caption)
Expresión Variable que representa un objeto CubeFields .
Parameters
Nombre | Obligatorio/opcional | Tipo de datos | Descripción |
---|---|---|---|
AttributeHierarchy | Obligatorio | Variant | Campo de cubo único que es una jerarquía de atributos (XlCubeFieldType = xlHierarchy y XlCubeFieldSubType = xlCubeAttribute). |
Función | Obligatorio | XlConsolidationFunction | Función que se ejecuta en el campo de datos agregado. |
Caption | Opcional | Variant | Etiqueta usada en el informe de tabla dinámica para identificar esta medida. Si la medida ya existe, Caption sobrescribirá la etiqueta existente de esta medida. |
Comentarios
La obtención de una medida mediante la función GetMeasure solo funcionará para estas funciones: Count, Sum, Average, Max y Min.
Por ejemplo, funcionarán:
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")
No funcionarán:
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")
Valor devuelto
CUBEFIELD
Soporte técnico y comentarios
¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.