Nota
O acesso a esta página requer autorização. Pode tentar iniciar sessão ou alterar os diretórios.
O acesso a esta página requer autorização. Pode tentar alterar os diretórios.
Adiciona outro item a um campo de página com vários itens.
Sintaxe
mais simples. 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 da origem de um objeto PivotItem , correspondente ao nome exclusivo do membro OLAP (Processamento Analítico Online) específico. |
| Lista de Limpeza | Opcional | Variant | 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 na posição da página e a propriedade EnableMultiplePageItems deve estar 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.