Skip to main content

Kutools para Office — Uma Suíte. Cinco Ferramentas. Aumente sua Produtividade.

Como converter uma Tabela Dinâmica em lista no Excel?

Author Sun Last modified

No trabalho diário com o Excel, você pode criar uma Tabela Dinâmica abrangente para analisar, resumir ou visualizar grandes quantidades de dados. No entanto, há cenários em que você precisa "achatar" ou converter a Tabela Dinâmica estruturada de volta para uma lista comum ou formato de tabela padrão — talvez para processar os dados ainda mais, compartilhá-los com outras pessoas ou importá-los para outro aplicativo. Este tutorial explora vários métodos práticos para converter uma Tabela Dinâmica de volta para uma lista no Excel, adequados tanto para conjuntos de dados pequenos quanto grandes.

Converter tabela dinâmica em lista

Código VBA: Converter Tabela Dinâmica em Lista Automaticamente


arrow blue right bubble Converter tabela dinâmica em lista

Antes de converter sua Tabela Dinâmica em uma lista padrão, certifique-se de que o layout da Tabela Dinâmica esteja finalizado conforme necessário. Por exemplo, suponha que você tenha projetado a seguinte Tabela Dinâmica que deseja reverter para uma estrutura de lista plana:

sample pivottable

1. Selecione qualquer célula dentro de sua Tabela Dinâmica. Vá para a guia Design na faixa de opções, escolha Subtotais e selecione Não Mostrar Subtotais. Esta etapa remove qualquer agrupamento ou linhas de subtotal que poderiam interferir no formato de lista plana que você deseja.

click Do Not Show Subtotals from Subtotals

2. Ainda na guia Design, clique em Totais Gerais e escolha Desativar para Linhas e Colunas. Desativar totais gerais garante que apenas seus dados reais permaneçam, evitando que linhas ou colunas de resumo apareçam em sua saída.

click Off for Rows and Columns under the design tab

3. Na guia Design, clique em Layout do Relatório e selecione Repetir Todos os Rótulos de Itens. Esta etapa é importante para achatar rótulos de linha de múltiplos níveis, para que cada linha na lista final mostre o contexto correto, independentemente de seu grupo ou categoria.

click Repeat All Item Labels under the design tab

4. Clique novamente em Layout do Relatório e escolha Mostrar em Formato Tabular. O formato tabular apresenta todos os dados em um layout verdadeiramente colunar, que está mais próximo de uma lista ou tabela padrão.

click Show in Tabular Form in the Report Layout tab

Neste ponto, sua Tabela Dinâmica se parecerá com uma tabela tradicional, tornando muito mais simples exportá-la como uma lista:

pivottable is changed

5. Para simplificar ainda mais a saída, vá para a guia Opções (ou Analisar, dependendo da versão do Excel). No grupo Mostrar, desmarque Botões e Cabeçalhos de Campo. Remover esses elementos ajuda a limpar seus dados para conversão em lista e torna sua saída mais organizada.

uncheck Buttons and Field Headers options

Sua Tabela Dinâmica agora aparecerá mais clara, contendo apenas seus campos de dados relevantes:

pivottable is changed without buttons

6. Se houver células vazias que você prefira exibir como zeros, clique com o botão direito em qualquer célula na Tabela Dinâmica e escolha Opções da Tabela Dinâmica. Na caixa de diálogo pop-up, na guia Layout e Formatação, desmarque Para células vazias mostrar. Em seguida, clique em OK. Esta etapa garante que sua lista exportada não terá espaços em branco onde você esperava valores, o que pode ser crucial ao processar ou importar para outros sistemas.

uncheck For empty cells show option

7. Selecione toda a faixa da Tabela Dinâmica que deseja converter. Pressione Ctrl + C para copiar, depois mova o cursor para a célula desejada na planilha onde você quer exibir a lista. Clique com o botão direito, escolha Colar Especial e selecione Valores (V). Este processo cola apenas os resultados como valores estáticos, sem qualquer estrutura ou interatividade da Tabela Dinâmica.

copy and paste the pivottable as values

Nota: No Excel 2007 ou anterior, use Página Inicial > Colar > Colar Valores para esta etapa.

Após colar, seus dados agora estão exibidos em formato de lista padrão, prontos para análise adicional, compartilhamento ou exportação:

PivotTable is displayed as normal list

Este método é direto e funciona bem para Tabelas Dinâmicas pequenas ou moderadamente grandes que não exigem atualizações frequentes. No entanto, se você tiver uma Tabela Dinâmica dinâmica ou que muda frequentemente, considere automatizar esse processo de conversão ou usar uma ferramenta de transformação de dados integrada para maior eficiência e precisão. Além disso, observe que Tabelas Dinâmicas complexas com campos calculados ou itens agrupados podem exigir ajustes adicionais após a conversão.


arrow blue right bubble Código VBA: Converter Tabela Dinâmica em Lista Automaticamente

Se você precisar converter Tabelas Dinâmicas frequentemente para uma lista padrão ou suas Tabelas Dinâmicas forem particularmente grandes, automatizar o processo pode economizar tempo e esforço significativos. Usando VBA (Visual Basic for Applications), você pode achatá-la em uma lista com o mínimo de passos manuais. Essa solução é adequada para usuários avançados, processamento em lote ou quando estiver lidando com dezenas ou centenas de Tabelas Dinâmicas.

Vantagens: Rápido para tarefas repetitivas, lida com grandes conjuntos de dados, reduz a chance de erros manuais.
Desvantagens: Requer ativar macros e algum entendimento de VBA. É recomendável fazer backup antes de executar o código pela primeira vez.

1. Clique em Ferramentas de Desenvolvedor > Visual Basic para abrir o editor de VBA. No editor, clique em Inserir > Módulo e cole o seguinte código na nova janela de módulo:

Sub ConvertPivotTableToList()
    Dim pt As PivotTable
    Dim wsPivot As Worksheet
    Dim rngTable As Range
    Dim wsNew As Worksheet
    
    On Error Resume Next
    xTitleId = "KutoolsforExcel"
    
    Set wsPivot = Application.ActiveSheet
    Set pt = wsPivot.PivotTables(1)
    
    If pt Is Nothing Then
        MsgBox "No PivotTable found on the current sheet.", vbExclamation, xTitleId
        Exit Sub
    End If
    
    Set rngTable = pt.TableRange2
    Set wsNew = Worksheets.Add
    
    rngTable.Copy
    wsNew.Range("A1").PasteSpecial Paste:=xlPasteValues
    
    Application.CutCopyMode = False
    
    MsgBox "Converted PivotTable to static list on new sheet: " & wsNew.Name, vbInformation, xTitleId
End Sub

2. Retorne à planilha e selecione a Tabela Dinâmica que deseja converter em uma lista. Pressione Alt + F8, selecione ConvertPivotTableToList na lista de macros e clique em Executar. Isso cria uma nova planilha com a Tabela Dinâmica copiada como uma lista estática.

Se você encontrar uma mensagem de erro, verifique se selecionou a folha correta contendo a Tabela Dinâmica antes de executar a macro. Além disso, certifique-se de que as macros estão ativadas no Excel. Se sua pasta de trabalho contiver várias Tabelas Dinâmicas, este código processará a primeira encontrada na planilha ativa.

Dica: Você pode modificar ainda mais o código para processar todas as Tabelas Dinâmicas em uma pasta de trabalho ou especificar qual Tabela Dinâmica converter.


Melhores Ferramentas de Produtividade para Office

🤖 Kutools AI Aide: Revolucione a análise de dados com: Execução Inteligente   |  Gerar Código  |  Criar Fórmulas Personalizadas  |  Analisar Dados e Gerar Gráficos  |  Chamar Funções Aprimoradas
Recursos Populares: Localizar, Destacar ou Marcar Duplicatas   |  Excluir Linhas em Branco   |  Consolidar Colunas ou Células sem Perder Dados   |   Arredondar...
Super PROC: Procura por múltiplos critérios    Procura por múltiplos valores  |   Procura em várias planilhas   |   Correspondência Fuzzy...
Lista Suspensa Avançada: Crie rapidamente Lista suspensa  |  Lista suspensa dependente  |  Lista suspensa com múltipla seleção ...
Gerenciador de Colunas: Adicionar número específico de colunas  | Mover Colunas  | Alternar status de visibilidade de Colunas ocultas |  Comparar Intervalos & Colunas...
Recursos em Destaque: Grade de foco   |  Visualização de Design  |  Barra de fórmulas aprimorada    Gerenciador de Pasta de trabalho & Planilha   |  Biblioteca de AutoTexto (Auto Text)   |  Selecionador de Data   |  Mesclar Dados   |  Criptografar/Descriptografar Células    Enviar Email por Lista   |  Super Filtro   |   Filtro Especial (filtrar negrito/itálico/tachado...) ...
Os 15 Principais Conjuntos de Ferramentas: 12 Ferramentas de Texto (Adicionar Texto, Excluir Caracteres Específicos, ...)  | 50+ Tipos de Gráficos (Gráfico de Gantt, ...)  | 40+ Fórmulas Práticas (Calcular a idade com base na data de nascimento, ...)  | 19 Ferramentas de Inserção (Inserir Código QR, Inserir Imagem pelo Caminho, ...)  | 12 Ferramentas de Conversão (Converter em Palavras, Conversão de Moeda, ...)  | 7 Ferramentas de Mesclar & Dividir (Mesclar Linhas Avançado, Dividir Células, ...) | ...e muito mais
Use o Kutools no idioma de sua preferência – compatível com Inglês, Espanhol, Alemão, Francês, Chinês e mais de40 idiomas!

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.

Excel Word Outlook Tabs PowerPoint
  • 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