Método CubeField.AddMemberPropertyField (Excel)

Adiciona um campo de propriedades membro para a exibição do campo de cubo.

Sintaxe

mais simples. AddMemberPropertyField (Property, PropertyOrder, PropertyDisplayedIn)

expressão Uma variável que representa um objeto CubeField .

Parâmetros

Nome Obrigatório/Opcional Tipo de dados Descrição
Propriedade Obrigatório String O nome exclusivo da propriedade membro. Para hierarquias equilibradas, um nome exclusivo pode ser criado pelo acréscimo do nome da propriedade membro "entre aspas" ao nome exclusivo do nível ao qual a propriedade membro está associada.

Para hierarquias não equilibradas, um nome exclusivo pode ser criado pelo acréscimo do nome da propriedade membro "entre aspas" ao nome exclusivo da hierarquia.
PropertyOrder Opcional Variant Define o valor da propriedade PropertyOrder para um objeto CubeField .

A posição real na coleção será imediatamente anterior ao campo PivotTable que tem atualmente o mesmo valor PropertyOrder fornecido no argumento. Se nenhum campo tiver o valor PropertyOrder fornecido, o intervalo de valores aceitáveis será 1 elevado ao número de propriedades de membro já exibidas para a hierarquia mais um.

Este argumento tem base um. Se for omitido, a propriedade irá para o fim da lista.
PropertyDisplayedIn Opcional XlPropertyDisplayedIn Especifica onde será exibida a propriedade. Se esse argumento for omitido, o campo de propriedade do membro será adicionado somente ao campo PivotTable.

Comentários

O campo de propriedade especificado não será visível se o modo de tabela dinâmica não tiver campos.

Para excluir propriedades membro, use o método Delete para excluir o objeto PivotField da coleção PivotFields.

Exemplo

Neste exemplo, o Microsoft Excel adiciona um campo de propriedade de membro intitulado Descrição ao modo de exibição de relatório de Tabela Dinâmica. Este exemplo pressupõe que uma Tabela Dinâmica existe na planilha ativa e que País, Área e Descrição são itens no relatório.

Sub UseAddMemberPropertyField() 
 
 Dim pvtTable As PivotTable 
 
 Set pvtTable = ActiveSheet.PivotTables(1) 
 
 With pvtTable 
 .ManualUpdate = True 
 .CubeFields("[Country]").LayoutForm = xlOutline 
 .CubeFields("[Country]").AddMemberPropertyField _ 
 Property:="[Country].[Area].[Description]" 
 .ManualUpdate = False 
 End With 
 
End Sub

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.

  • Last updated on