JerSoO,
Tem como você postar um exemplo???

Bom dia!!

Poste o arquivo compactado!!

Private Sub CommandButton1_Click()
Sheet2.Calculate
ChartObjects(1).Chart.Refresh
End Sub

Tenta isso
cria dentro da (plan 4)

Private Sub Worksheet_Activate()
ActiveSheet.PivotTables("Tabela dinâmica1").PivotCache.Refresh
End Sub

assim toda vez q ela ativar o grafico atualiza

Pessoal estou postando um exemplo da planilha compactado.

Tenta isso
cria dentro da (plan 4)

Private Sub Worksheet_Activate()
ActiveSheet.PivotTables("Tabela dinâmica1").PivotCache.Refresh
End Sub

assim toda vez q ela ativar o grafico atualiza

Já tentei esse código porém ele atualiza os dados somente do primeiro e segundo gráfico.
Na Plan4 ou BI no exemplo da minha planilha, terão vários gráficos.

Seu arquivo pede senha para abrir, se possivel poste sem a senha.
Aparentemente vc tem mais de um pivot na planilha, se isso for procedente, tente alterando o codigo informado anteriormente para:

Private Sub Worksheet_Activate()

For i = 1 To Worksheets("Plan4").PivotTables.Count
    ActiveSheet.PivotTables(i).PivotCache.Refresh
Next
End Sub

Pessoal desculpe... esqueci de postar a senha.

A dica do Reinaldo resolveu meu problema.

Muito Obrigado!

Boa tarde!!

Então por favor marque seu tópico como resolvido!!
Veja como em:
viewtopic.php?f=7&t=3784
Att