Como eliminar uma ou todas as Tabelas Dinâmicas no Excel?
A Tabela Dinâmica é uma funcionalidade extremamente útil para visualizar e calcular dados no Excel, pelo que frequentemente a inserimos numa folha de cálculo ou até em várias folhas. Mas sabe como eliminar uma ou todas as Tabelas Dinâmicas de uma folha de cálculo ou da pasta de trabalho inteira?
Eliminar um Tabela Dinâmica numa folha de cálculo
Eliminar todos os Tabela Dinâmica na pasta de trabalho inteira com VBA
Eliminar um Tabela Dinâmica numa folha de cálculo
No Excel, pode eliminar um Tabela Dinâmica da seguinte forma:
1. Clique no relatório de Tabela Dinâmica. Veja a captura de ecrã:
2. Depois, clique em Opção > Selecionar > Tabela Dinâmica Inteira para selecionar a Tabela Dinâmica. Veja a captura de ecrã:
Dica: Se estiver a utilizar o Excel 2013, selecione toda a Tabela Dinâmica clicando em Analisar > Selecionar > Tabela Dinâmica Inteira.
3. E prima a tecla Delete do teclado; a Tabela Dinâmica será removida.
Eliminar todos os Tabela Dinâmica na pasta de trabalho inteira com VBA
Se tiver várias Tabelas Dinâmicas numa pasta de trabalho, eliminá-las uma a uma é demasiado demorado. Agora, pode usar um código VBA para removê-las todas de uma só vez.
1. Prima Alt + F11 para abrir a janela do Microsoft Visual Basic para Aplicações.
2. Na janela, clique em Inserir > Módulo para abrir uma nova janela de módulo e, em seguida, copie o seguinte código VBA para essa janela.
VBA: Remover todas as Tabelas Dinâmicas da 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:
As Melhores Ferramentas de Produtividade para o Office
Potencie as suas competências no Excel com Kutools para Excel e experimente uma eficiência como nunca antes.Kutools para Excel Oferece mais de 300 funcionalidades avançadas para impulsionar a produtividade e Economizar Tempo.Clique aqui para obter a funcionalidade de que mais precisa...
Office Tab Traz uma interface com separadores para o Office e torna o seu trabalho muito mais fácil
- Ative a edição e leitura com separadores no Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
- Abra e crie vários documentos em novos separadores da mesma janela, em vez de em janelas separadas.
- Aumente a sua produtividade em 50 % e elimine centenas de cliques do rato todos os dias!
Todos os suplementos Kutools — num único instalador.
Kutools for Office reúne suplementos para Excel, Word, Outlook e PowerPoint, além do Office Tab Pro, sendo a solução ideal para equipas que trabalham em várias aplicações do Office.
- Pacote tudo-em-um— suplementos para Excel, Word, Outlook e PowerPoint + Office Tab Pro
- Um instalador, uma licença— configuração em minutos (pronto para MSI)
- Funciona melhor em conjunto— produtividade simplificada em todas as aplicações do Office
- Teste gratuito de 30 dias com todas as funcionalidades— sem registo, sem cartão de crédito
- Melhor relação qualidade-preço— poupe face à compra individual dos suplementos