Boa Tarde!

Tenho uma planilha, que em uma das abas tenho 3 gráficos que atualizam a partir da seleção dos campos de segmentação de dados.

Um dos gráficos é um gráfico de pareto, então precisava de uma macro para alterar o valor máximo do eixo do gráfico.

Fiz a macro, porém, eu preciso que o gráfico atualize quando o usuário selecionar na segmentação de dados.

A macro funciona, porém ele atualiza quando qualquer planilha aberta atualiza, o que causa um erro porque não acha o gráfico.

Segue o código:

Private Sub Worksheet_Calculate()

Application.ScreenUpdating = False
ActiveSheet.ChartObjects("Gráfico 29").Activate
ActiveChart.Axes(xlValue).Select
ActiveChart.Axes(xlValue).MaximumScale = Range("r40").Value
Application.ScreenUpdating = True
End Sub

Alguém consegue me ajudar? Para só atualizar na aba que eu quero?

Obrigado