Views

Important:

Quaisquer necessidades de soluções e/ou desenvolvimento de aplicações pessoais/profissionais, que não constem neste Blog podem ser tratados como consultoria freelance à parte.

...

18 de dezembro de 2012

VBA Excel - Atualize todas as suas Tabelas Dinâmicas - Refresh all Pivots on Open

Inline image 1




Atualize todas as suas Tabelas Dinâmicas assim que abrir a planilha.

Sub AllWorkbookPivots()

Dim pt As pivotTable
Dim ws As Worksheet

For Each ws In ActiveWorkbook.Worksheets

For Each pt In ws.PivotTables
pt.RefreshTable
Next pt

Next ws



Tags: Excel, Tip, Pivot Table, Tabela Dinâmica, workbook, Worksheet,

Nenhum comentário:

Postar um comentário

eBooks VBA na AMAZOM.com.br

Vitrine