Método CubeField.AddMemberPropertyField (Excel)

  • Artigo

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

Sintaxe

expressão. AddMemberPropertyField (Propriedade, 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 Variantes 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 para o número de propriedades membro já exibidas para a hierarquia mais uma.

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 membro intitulado Descrição à exibição de relatório de Tabela Dinâmica. Este exemplo pressupõe que exista uma Tabela Dinâmica 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.