Página 1 de 1

Atualizar tabela dinâmica

Enviado: 27 Mai 2020 às 18:14
por EmersonLegatti
Boa noite pessoal, tudo bem?
Acredito que seja algo simples, mas não consegui fazer sozinho....
Em uma planilha tenho uma tabela (Tb_itens) e uma tabela dinâmica que a usa como base de dados.
Gostaria que ao acrescentar itens na Tb_itens a tabela dinâmica fosse atualizada automaticamente.
Já achei códigos que fazem esta atualização ao trocar de planilhas, tentei adaptar para este modo que preciso e não consegui.
Existe essa possibilidade?

Obrigado, grande abraço a todos.

Re: Atualizar tabela dinâmica

Enviado: 27 Mai 2020 às 19:14
por AfonsoMira
Boas fiz um pequeno exemplo aqui e funciona certo, cada vez que actualizo a folha ele me actualiza a tabela dinâmica.

Formatei a tabela como tabela e adicionei o nome Tb_Items, depois carreguei em cima da tabela cliquei ctrl+T e selecionou a tabela inteira, logo de seguida fiz inserir tabela dinãmica.

Deixo arquivo de exemplo em anexo.

Se necessitar atualizar a folha com VBA a macro é a seguinte:
Código: Selecionar todos
ActiveWorkbook.RefreshAll
Se necessitar de ajuda ou caso não seja este o resultado pretendido é so chamar.

:D

Re: Atualizar tabela dinâmica

Enviado: 27 Mai 2020 às 19:18
por Kledison
Boa noite!

outra sugestão, nesse caso ao alterar qualquer célula das colunas A e B a tabela dinâmica é atualizada.
Código: Selecionar todos
Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Column <= 2 Then
        ActiveSheet.PivotTables("Tabela dinâmica1").PivotCache.Refresh
    End If
End Sub
Imagem


Att

Re: Atualizar tabela dinâmica

Enviado: 28 Mai 2020 às 14:21
por EmersonLegatti
Boa tarde AfonsoMira tudo bem?
Obrigado pela força, mas não funcionou aqui comigo.
Acrescentei mais itens e na tabela normal e não atualizou automaticamente a tabela dinâmica :( .
(segue arquivo anexo)
Outra coisa, nenhuma das duas tabelas tem o nome Tb_itens.....mas acho que isso não tem nada a ver, certo??
O código eu tentei inserir, mas também não deu certo, posso ter inserido em local errado.
Poderia dar uma olhada por favor, valeu msm.
Abraços.

Re: Atualizar tabela dinâmica

Enviado: 28 Mai 2020 às 14:36
por Kledison
Boa tarde!

apesar de não ter comentado a solução que eu mencionei, segue a planilha com a macro.

Verifica se é assim que precisa.

Att

Re: Atualizar tabela dinâmica

Enviado: 28 Mai 2020 às 14:43
por EmersonLegatti
Boa tarde Kledison, tudo bem?
Primeiramente muito obrigado pela força também cara.
Não sei se estou colocando o código em lugar errado, mas não deu certo como vc mostrou.
(arquivo anexo)
Usei o arquivo do nosso colega que respondeu primeiro como exemplo.
Nomeei as tabelas e troquei o nome da tabela dinâmica no código, mas não deu.
Poderia dar uma olhada novamente por favor?
Muito obrigado de novo.
Abraços.

Atualizar tabela dinâmica

Enviado: 28 Mai 2020 às 14:47
por Kledison
Confere na mensagem acima que eu postei o anexo.

Att

Atualizar tabela dinâmica

Enviado: 28 Mai 2020 às 15:11
por EmersonLegatti
Boa tarde Kledison, tudo bem?
Cara, foi mal não ter respondido direto na sua msg, desculpa mesmo, mas te respondi e até enviei o arquivo com seu nome....
Testei aqui e deu certíssimo!!!
No código, o valor <= é em relação às colunas certo? Qualquer dado inserido da coluna 1 até a 6 irá atualizar a tabela dinâmica, certo?
Valeu mesmo pela força.
Muito obrigado novamente. Resolvido.

Atualizar tabela dinâmica

Enviado: 28 Mai 2020 às 15:15
por Kledison
Boa tarde!

tranquilo, isso mesmo, qualquer valor digitado até a coluna 6 irá atualizar os dados da tabela dinâmica.

Faça alguns testes aí, se surgir algum problema nos avise.

A macro está dentro do módulo da página/folha (1).

Att