Este fórum está sendo desativado

[FCamargo]

Bom dia a todos,

Criei uns botão de macro bem simples para mudar de plan.
Gostaria de melhorar este macro incrementando uma ação de atualizar automático o gráfico que esta nesta Plan, entendeu?

Porque hoje eu faço isso manualmente, aperto o botão para mudar de plan e depois tenho que clicar dentro do grafio > Analisar> Atualizar.

Eu queria tornar mais dinamico na hora que mudasse de plan, atualizar também. É possivel?

Meu macro:

Código: Selecionar todos

Sub GRFGRAM()
Plan20.Activate
End Sub

OBS: Eu preciso ter o nome do grafico para inserir no codigo?

Abs
Fabricio

[alexandrevba]

Bom dia!!


Tente o comando

Código: Selecionar todos

ActiveSheet.ChartObjects("NomeDoGrafico").Chart.Refresh 

Para atualizar neste caso

Eu queria tornar mais dinamico na hora que mudasse de plan, atualizar também. É possivel?

Use o evento

Código: Selecionar todos

Private Sub Worksheet_Activate() 

ou

Código: Selecionar todos

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

E por ai vai...........

Att

[FCamargo]

Bom dia!!


Tente o comando

Código: Selecionar todos

ActiveSheet.ChartObjects("NomeDoGrafico").Chart.Refresh 

Para atualizar neste caso

Eu queria tornar mais dinamico na hora que mudasse de plan, atualizar também. É possivel?

Use o evento

Código: Selecionar todos

Private Sub Worksheet_Activate() 

ou

Código: Selecionar todos

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

E por ai vai...........

Att

Obrigado pelo retorno Alexandre

Eu consigo adicionar esta linha no meu codigo do macro acima?

Código: Selecionar todos

ActiveSheet.ChartObjects("NomeDoGrafico").Chart.Refresh

E onde eu vejo o nome do grafico?

[alexandrevba]

Bom dia!!

O mais justo para nós dois, seria que postasse um arquivo modelo

Mas se não puder, os eventos desse tipo (tem ação na guia)
https://msdn.microsoft.com/pt-br/librar ... 39775.aspx
Devem ser posto dentro do módulo de guia.
Para saber o nome do grafico, click no mesmo, onde mostra o nome da célula (canto superior esquerdo), vai mostrar o nome dos objetos ex: Gráfico 1

Att

[FCamargo]

Alexandre,

Segue em anexo um exemplo da minha tarefa.

Eu perguntei para saber nome do grafico porque tenho varios graficos no meu arquivo e todos estão com o nome "Grafico1". Isso pode dar problema para fazer a rotina para atualizar automatico?

Grato

[Kledison]

Bom dia,

segue conforme solicitado, altere o valor na aba TOPOGRAFIA e verifique no gráfico se o valor alterou.

[FCamargo]

Bom dia,

segue conforme solicitado, altere o valor na aba TOPOGRAFIA e verifique no gráfico se o valor alterou.

Show Kledison,
Como vc fez isso?

Tenho que fazer para minha planilha principal.

[Kledison]

No seu caso eu gravei uma Macro.

Entrei na aba que tem a tabela Dinâmica,
liguei o gravador de Macro,
Cliquei com o botão direito em cima da tabela Dinâmica e mandei atualizar,
Desliguei o gravador de Macro,

Foi gerado essa macro por exemplo:

Código: Selecionar todos

Sub Macro4()
'
' Macro4 Macro
'

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

dessa Macro eu peguei somente a linha:

Código: Selecionar todos

ActiveSheet.PivotTables("Tabela dinâmica1").PivotCache.Refresh

Dentro do editor de VBA coloquei a macro dentro do módulo da planilha que tem o gráfico, no seu exemplo Plan1(GRAFICO-TOPO), ficando assim:

Código: Selecionar todos

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

Bom, foi o jeito que consegui fazer, pois ainda sou iniciante em VBA

[FCamargo]

Então no botão de mudar de planilha não é alterado o codigo?

apenas acrescenta o macro dentro do modulo da plan do grafico.
Não entendi muito bem como coloca o macro dentro do modulo da plan que tem o grafico.

[Kledison]

Verifica na imagem abaixo, quando gravei a Macro foi criado o Módulo1, retirei apenas aquela linha que te falei e coloquei dentro do módulo da Planilha conforme imagem.

Acredito que não precisa colocar nada no seu botão para mudar de planilha, pois essa macro já faz a atualização do gráfico assim que a planilha é ativada.

[FCamargo]

Olá Pessoal!

Desculpe a demora para responder, estava meio ocupado semana passado.

No meu modulo, como eu faço para inserir a linha do codigo para atualizar meu "grafico 2"?

Segue em anexo a imagem exemplo.

Grato

[Kledison]

Boa tarde,

o seu gráfico está em Formulário ou em Planilha ?

[FCamargo]

Crei uma tabela dinamica com um grafico.

Para ter acesso a esta plan que possui o grafico eu criei um botão (macro).

[Kledison]

Ok,

coloque a macro que você postou dentro do módulo da guia correspondente ao Gráfico, verifique a imagem que postei no dia 25.

Você está colocando dentro do Módulo errado.

[FCamargo]

Ok,

coloque a macro que você postou dentro do módulo da guia correspondente ao Gráfico, verifique a imagem que postei no dia 25.

Você está colocando dentro do Módulo errado.

Obrigado meu amigo!!
Funcionou, obrigado pela atenção.

Abs