Como excluir uma ou todas as tabelas dinâmicas no Excel?
A tabela dinâmica é uma função muito útil para visualizar ou calcular dados no Excel, então geralmente podemos inserir tabelas dinâmicas em uma planilha ou várias planilhas. Mas você sabe como excluir uma ou todas as tabelas dinâmicas em uma planilha ou na pasta de trabalho inteira?
Excluir uma tabela dinâmica em uma planilha
Excluir todas as tabelas dinâmicas na pasta de trabalho inteira com VBA
Excluir uma tabela dinâmica em uma planilha
No Excel, você pode excluir uma tabela dinâmica da seguinte forma:
1. Clique no relatório da tabela dinâmica. Veja a captura de tela:
2. Em seguida, clique em Opção > Selecionar > Toda a Tabela Dinâmica para selecionar a tabela dinâmica. Veja a captura de tela:
Dica: Se você estiver usando o Excel 2013, selecione toda a tabela dinâmica clicando em Analisar > Selecionar > Toda a Tabela Dinâmica.
3. E pressione o botão Excluir no teclado, a tabela dinâmica será removida.
Excluir todas as tabelas dinâmicas na pasta de trabalho inteira com VBA
Se você tiver várias tabelas dinâmicas em uma pasta de trabalho, excluí-las uma por uma é muito demorado. Agora você pode usar um VBA para removê-las de uma só vez.
1. Pressione Alt + F11 para exibir a janela do Microsoft Visual Basic for Applications.
2. Na janela, clique em Inserir > Módulo para mostrar uma nova janela de módulo, depois copie o seguinte código VBA para a janela do módulo.
VBA: Remover todas as tabelas dinâmicas na pasta de trabalho inteira.
Sub DeleteAllPivotTablesInWorkbook()
'Updateby20140618
Dim xWs As Worksheet
Dim xPT As PivotTable
For Each xWs In Application.ActiveWorkbook.Worksheets
For Each xPT In xWs.PivotTables
xWs.Range(xPT.TableRange2.Address).Delete Shift:=xlUp
Next
Next
End Sub
Artigos Relacionados:
Melhores Ferramentas de Produtividade para Office
Impulsione suas habilidades no Excel com Kutools para Excel e experimente uma eficiência incomparável. Kutools para Excel oferece mais de300 recursos avançados para aumentar a produtividade e economizar tempo. Clique aqui para acessar o recurso que você mais precisa...
Office Tab traz interface com abas para o Office e facilita muito seu trabalho
- Habilite edição e leitura por abas no Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
- Abra e crie múltiplos documentos em novas abas de uma mesma janela, em vez de em novas janelas.
- Aumente sua produtividade em50% e economize centenas de cliques todos os dias!
Todos os complementos Kutools. Um instalador
O pacote Kutools for Office reúne complementos para Excel, Word, Outlook & PowerPoint, além do Office Tab Pro, sendo ideal para equipes que trabalham em vários aplicativos do Office.
- Pacote tudo-em-um — complementos para Excel, Word, Outlook & PowerPoint + Office Tab Pro
- Um instalador, uma licença — configuração em minutos (pronto para MSI)
- Trabalhe melhor em conjunto — produtividade otimizada entre os aplicativos do Office
- Avaliação completa por30 dias — sem registro e sem cartão de crédito
- Melhor custo-benefício — economize comparado à compra individual de add-ins