Fóruns
Microsoft Excel - 2...
2024 - VBA & Macros
Atualizar Tabela Di...
 
Notifications
Clear all

Atualizar Tabela Dinamica Automaticamente

 
2024 - VBA & Macros
Post Recente por rickevil21 10 anos atrás
3 Posts
2 Usuários
0 Reactions
736 Visualizações
RSS
 rickevil21
(@rickevil21)
Posts: 0
New Member
Topic starter
 

Bom dia Pessoal!

Sou novo no fórum e estou precisando de uma ajuda, criei uma planilha que em uma aba existem varias planilhas dinâmicas, porem eu queria que elas atualizassem automaticamente quando eu clicasse nessa aba

eu utilizei a seguinte formula para atualizar a planilha quando eu clico em qualquer célula da tabela

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
ActiveSheet.PivotTables("documentos").RefreshTable
End Sub

porem eu queria uma para atualizar as tabelas dinâmicas quando eu clicasse na aba, alguém consegue me ajudar

 
Postado : 31/10/2014 9:10 am
 Wagner Morel
(@wagner-morel-vidal-nobre)
Posts: 4063
Famed Member
 

rickevil21,

Boa Tarde!

Não testei mas... veja se assim dá certo:

Private Sub Workbook_SheetActivate(ByVal Sh As Object)
    'Essa referência deve ser alterada de acordo com os dados da sua diâmica, _
    de modo que uma célula qualquer da dinâmica esteja selecionada.
    Range("A16").Select
    ActiveSheet.PivotTables("documentos").PivotCache.Refresh
End Sub
 
Postado : 31/10/2014 1:18 pm
 rickevil21
(@rickevil21)
Posts: 0
New Member
Topic starter
 

não funcionou, eu tenho varias Tabelas dinâmicas em uma única aba da planilha, com a outra formula quando eu clicava em qualquer célula as dinâmicas já atualizavam, quando testei essa, não funcionou.

 
Postado : 31/10/2014 1:55 pm
Forum Jump:
  Tópico Anterior
Próximo Tópico