Como atualizar automaticamente uma tabela dinâmica no Excel?
Normalmente, quando atualizamos os dados de origem de uma tabela dinâmica, a tabela dinâmica não será atualizada até clicarmos Analise > revisar manualmente. Isso será muito enfadonho se a tabela dinâmica permanecer em outra planilha e você se esquecer de atualizá-la. Aqui, este artigo apresentará um VBA para atualizar automaticamente uma tabela dinâmica no Excel.
Atualizar automaticamente uma tabela dinâmica por VBA
Atualizar automaticamente uma tabela dinâmica por VBA
Siga as etapas abaixo para aplicar o VBA para atualizar automaticamente a tabela dinâmica especificada no Excel.
1. Na barra da guia Planilha, clique com o botão direito na guia da planilha que contém os dados de origem e selecione Ver código no menu de contexto. Veja a imagem:
2. Na janela de abertura do Microsoft Visual Basic for Applications, cole o código.
VBA: atualização automática da tabela dinâmica especificada
Private Sub Worksheet_Change(ByVal Target As Range)
Worksheets("sheet name").PivotTables("PivotTable name").PivotCache.Refresh
End Sub
Observações:
(1) No código das Planilhas ("nome da folha") .PivotTables ("Nome da tabela dinâmica") .PivotCache.Refresh, substitua nome da folha pelo nome da página que contém a tabela dinâmica especificada e substitua o Nome da tabela dinâmica com o nome da tabela dinâmica especificada.
(2) Selecione qualquer célula na tabela dinâmica especificada, você obterá seu nome no Analise guia (ou Opções aba). Veja a imagem:
3. Salve o código.
A partir de agora, quando você alterar os dados nos dados de origem, a tabela dinâmica especificada será atualizada automaticamente.
Combine facilmente várias planilhas / pastas de trabalho / arquivos CSV em uma planilha / pasta de trabalho
Pode ser entediante combinar dezenas de planilhas de diferentes pastas de trabalho em uma única planilha. Mas com o Kutools para Excel Combine (planilhas e pastas de trabalho) utilitário, você pode fazer isso com apenas alguns cliques!
Artigos relacionados:
Melhores ferramentas de produtividade de escritório
Aprimore suas habilidades de Excel com o Kutools para Excel e experimente uma eficiência como nunca antes. Kutools para Excel oferece mais de 300 recursos avançados para aumentar a produtividade e economizar tempo. Clique aqui para obter o recurso que você mais precisa...
Office Tab traz interface com guias para o Office e torna seu trabalho muito mais fácil
- Habilite a edição e leitura com guias em Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
- Abra e crie vários documentos em novas guias da mesma janela, em vez de em novas janelas.
- Aumenta sua produtividade em 50% e reduz centenas de cliques do mouse para você todos os dias!