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 na pasta de trabalho especificada.
Comentários
Observação
A propriedade Tabelas Dinâmicas do objeto Pasta de Trabalho não retorna todos os objetos de Tabela Dinâmica na pasta de trabalho; em vez disso, ela retorna apenas os associados a Gráficos Dinâmicos separados. No entanto, o método Tabelas Dinâmicas do objeto Planilha retorna todos os objetos de Tabela Dinâmica na planilha, independentemente de eles estarem ou não associados a Gráficos Dinâmicos separados.
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
Use o método de Tabelas Dinâmicas para retornar 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
Use 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")
Use Tabelas Dinâmicas (índice), onde índice é o número ou nome do índice da Tabela Dinâmica, para retornar 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.