Observação
O acesso a essa página exige autorização. Você pode tentar entrar ou alterar diretórios.
O acesso a essa página exige autorização. Você pode tentar alterar os diretórios.
Uma coleção de todos os objetos de Tabela Dinâmica no livro especificado.
Comentários
Observação
A propriedade Tabelas Dinâmicas do objeto Livro não devolve todos os objetos de Tabela Dinâmica no livro; Em vez disso, devolve apenas os associados a gráficos dinâmicos desacoplados. No entanto, o método tabelas dinâmicas do objeto Folha de Cálculo devolve todos os objetos de Tabela Dinâmica na folha de cálculo, independentemente de estarem associados a gráficos dinâmicos desacoplados.
Como a programação de relatório de Tabela Dinâmica pode ser complexa, geralmente é mais fácil registrar ações de relatório de Tabela Dinâmica e examinar o código gravado.
Exemplo
Utilize o método tabelas dinâmicas para devolver a coleção de Tabelas Dinâmicas . O exemplo a seguir exibe o número de relatórios de Tabela Dinâmica na Planilha3.
MsgBox Worksheets("sheet3").PivotTables.Count
Utilize o método PivotTableWizard para criar um novo relatório de tabela dinâmica e adicioná-lo à coleção. O exemplo a seguir cria um novo relatório de Tabela Dinâmica de um banco de dados do Microsoft Excel (contido no intervalo A1:C100).
ActiveSheet.PivotTableWizard xlDatabase, Range("A1:C100")
Utilize tabelas dinâmicas (índice), em que o índice é o número ou nome do índice da tabela dinâmica, para devolver um único objeto de tabela dinâmica . O exemplo a seguir transforma o campo Ano em um campo de linha no primeiro relatório de Tabela Dinâmica na Planilha3.
Worksheets("sheet3").PivotTables(1) _
.PivotFields("year").Orientation = xlRowField
Métodos
Propriedades
Confira também
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.