Observação
O acesso a essa página exige autorização. Você pode tentar entrar ou alterar diretórios.
O acesso a essa página exige autorização. Você pode tentar alterar os diretórios.
Dada uma hierarquia de atributos, devolve uma medida implícita para a função especificada que corresponde a este atributo. Se não existir uma medida implícita, é criada uma nova medida implícita e adicionada à coleção CubeFields .
Sintaxe
expressão. GetMeasure (AttributeHierarchy, Function, Caption)
expressão Uma variável que representa um objeto CubeFields .
Parâmetros
| Nome | Obrigatório/Opcional | Tipo de dados | Descrição |
|---|---|---|---|
| AttributeHierarchy | Obrigatório | Variant | O campo de cubo exclusivo que é uma hierarquia de atributos (XlCubeFieldType = xlHierarchy e XlCubeFieldSubType = xlCubeAttribute). |
| Function | Obrigatório | XlConsolidationFunction | A função realizada no campo de dados adicionado. |
| Caption | Opcional | Variant | A etiqueta utilizada no relatório de tabela dinâmica para identificar esta medida. Se a medida já existir, a Legenda substituirá a etiqueta existente desta medida. |
Comentários
Obter uma medida com a função GetMeasure funcionará apenas para estas funções: Count, Sum, Average, Max e Min.
Por exemplo, estes irão funcionar:
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")
Estes não funcionarão:
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 de retorno
CAMPO CUBO
Suporte e comentários
Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.