Compartilhar via


Método PivotField.AddPageItem (Excel)

Adiciona outro item a um campo de página com vários itens.

Sintaxe

expressão. AddPageItem (Item, ClearList)

Expressão Uma variável que representa um objeto PivotField .

Parâmetros

Nome Obrigatório/Opcional Tipo de dados Descrição
Item Obrigatório String Nome de origem de um objeto PivotItem , correspondente ao nome exclusivo do membro do OLAP (Processamento Analítico Online) específico.
ClearList Opcional Variantes Se for False (padrão), um item de página será adicionado à lista existente. Se for True, todos os itens atuais serão excluídos e um Item será adicionado.

Comentários

Para evitar erros de tempo de execução, a fonte de dados deve ser uma fonte OLAP, o campo escolhido deve estar atualmente na posição da página e a propriedade EnableMultiplePageItems deve ser definida como True.

Exemplo

Neste exemplo, o Microsoft Excel adiciona um item de página com um nome de fonte chamado "[Product].[All Products].[Food].[Eggs]". Este exemplo pressupõe que exista uma Tabela Dinâmica OLAP na planilha ativa.

Sub UseAddPageItem() 
 
 ' The source is an OLAP database and you can manually reorder items. 
 ActiveSheet.PivotTables(1).CubeFields("[Product]"). _ 
 EnableMultiplePageItems = True 
 
 ' Add the page item titled "[Product].[All Products].[Food].[Eggs]". 
 ActiveSheet.PivotTables(1).PivotFields("[Product]").AddPageItem ( _ 
 "[Product].[All Products].[Food].[Eggs]") 
 
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.