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, portanto, podemos inserir tabelas dinâmicas em uma planilha ou em várias planilhas. Mas você sabe como excluir uma ou todas as tabelas dinâmicas de uma planilha ou de toda a pasta de trabalho?

Excluir uma tabela dinâmica em uma planilha

Exclua todas as tabelas dinâmicas em toda a pasta de trabalho 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 de tabela dinâmica. Veja a imagem:

2. Então clique Opção > Selecionar > Tabela Dinâmica Inteira para selecionar a tabela dinâmica. Veja a imagem:

Dica: se você estiver usando o Excel 2013, selecione a tabela dinâmica inteira clicando no Análise > Selecionar > Tabela Dinâmica Inteira.

3. E pressione Apagar botão no teclado, a tabela dinâmica será removida.

---

Exclua todas as tabelas dinâmicas em toda a pasta de trabalho 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ê-los de uma vez.

1. Pressione Alt + F11 para exibir o Microsoft Visual Basic para Aplicações janela.

2. Na janela, clique em inserção > Módulo para mostrar uma nova janela do módulo, copie o seguinte código VBA para a janela do módulo.

VBA: Remova todas as tabelas dinâmicas de toda a pasta de trabalho.

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

3. Clique Execute botão, então todas as tabelas dinâmicas em toda a pasta de trabalho são removidas.

---

Artigos relativos:

• Remova todos os comentários no Excel