Como fazer a planilha atualizar automaticamente

Neste artigo vamos mostrar como atualizar a planilha inteira com qualquer mudança na planilha.

Vamos supor que temos a seguinte tabela dinâmica:

Agora toda a vez que os valores da tabela fonte alterar queremos que a tabela dinâmica seja atualizada automaticamente.

Para fazer isso vamos então abrir a janela do VBA pressionando Alt + F11 ou no Menu desenvolvedor - Visual Basic

Nessa janela copie e cole o código abaixo:

Private Sub Worksheet_Change(ByVal Target As Range)
  ActiveWorkbook.RefreshAll
End Sub

Veja na figura abaixo onde deve colocar o código VBA:

Só para ilustrar esse código vai atualizar todas as tabelas dinâmicas e conexões externas caso haja alguma alteração nas células.

Dessa forma com o código inserido na planilha qualquer alteração de valor na sua tabela fonte a tabela dinâmica vai atualizar automaticamente.

Neste exemplo atualizamos as tabelas dinâmicas no entanto você pode colocar dentro do código qualquer comando como mandar mensagem, calcular a planilha inteira, salvar, etc.

Sendo assim veja um exemplo do código caso desejasse salvar a planilha:

Private Sub Worksheet_Change(ByVal Target As Range)
  ActiveWorkbook.Save
End Sub

Como fazer a planilha atualizar automaticamente

Gostou do conteúdo? Ele foi útil?
Se ainda ficou com alguma dúvida entre em contato conosco pelo email contato@exceleaccess.com.
Quer receber várias dicas no seu seu email?
Cadastre seu email aqui para receber várias dicas como essa por email.