Atualizar Tabela Dinâmica com Excel VBA

Olá, Programadores! Nesse post vocês vão perceber como é simples atualizar tabela dinâmica através do Excel VBA.

Como a maioria já sabe, ao alterar uma base de dados que alimenta uma tabela dinâmica, é necessário clicar com o botão direito em cima da tabela e clicar em “Atualizar”.

Portanto, essa é a forma “manual” de se atualizar uma tabela dinâmica:

Código VBA: Atualizar Tabela Dinâmica com Excel VBA

Porém, algumas pessoas pouco familiarizadas com o Excel não sabem que através de um código VBA bem simples é possível atualizar uma ou mais tabelas dinâmicas sem que seja necessário o deslocamento do mouse até elas.

Um exemplo de código bem simples é este:

Sub Importar_Cadastro()

     Sheets("Premissas Gerais").PivotTables("Tabela 1").PivotCache.Refresh

     Sheets("Premissas Gerais").PivotTables("Tabela 2").PivotCache.Refresh

     Sheets("Vendas Gerais").PivotTables("Tabela 3").PivotCache.Refresh

     Sheets("Vendas Gerais").PivotTables("Tabela 4").PivotCache.Refresh

End Sub

Note que as tabelas dinâmicas “Tabela 1” e “Tabela 2” estão na aba “Premissas Gerais”, enquanto as tabelas “Tabela 3″ e ” Tabela 4″ estão na aba “Vendas Gerais”.

Configurando as Tabelas Dinâmicas

Mas como exatamente atribuímos esses nomes às tabelas dinâmicas? É bem simples.

Clique com o botão direito em cima de uma das tabela dinâmicas e em seguida selecionem a opção “Opções da Tabela Dinâmica…”.

Em seguida, insira o nome da tabela no campo ao lado de “Nome da Tabela Dinâmica”

Por fim, pode-se criar um botão atrelado a esta macro em local de fácil acesso na planilha.

Conclusão

A atualização de tabelas dinâmicas via Excel VBA pode inclusive estar configurada para acontecer sempre que se abrir ou fechar um arquivo.

Em um dos arquivos desenvolvidos para a BIC no Projeto de Projeção de Vendas, uma macro atualizava 15 tabelas dinâmicas.

+ Saiba como abrir um arquivo através do Excel VBA

+ Saiba como enviar imagem via Outlook por Excel VBA

+ Saiba como selecionar um arquivo através do Excel VBA

+ Saiba como listar o nome de todas as abas de um Excel

Por fim, se precisar de qualquer ajuda com seus arquivos, clique aqui e fale com a gente.

Abraços!