Boa noite!!
Por favor, tire um tempo e leia as regras, os arquivos devem ser compactados!!
viewtopic.php?f=7&t=203
Imagine que você ao criar suas tabelas dinâmicas, selecionou as colunas por inteiro.
Para atualizar todas as tabelas veja:
Sub AtualizaTabelasDinamicas()
Dim PT As PivotTable
Dim WS As Worksheet
For Each WS In ThisWorkbook.Worksheets
For Each PT In WS.PivotTables
PT.RefreshTable
Next PT
Next WS
End Sub
Att
Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel
Postado : 22/04/2013 5:25 pm