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
expressão. AddPageItem (Item, ClearList)
expressão Uma variável que representa um objeto de Campo Dinâmico .
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 OLAP (Online Analytical Processing) específico. |
| Lista DeSmarcada | 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 origem de dados tem de ser uma origem OLAP, o campo escolhido tem de estar atualmente na posição da página e a propriedade EnableMultiplePageItems tem de ser definida como Verdadeiro.
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 existe uma Tabela Dinâmica OLAP na folha de cálculo 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.