Important:

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

Views

Vitrine

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,

LinkWithinBrazilVBAExcelSpecialist

Related Posts Plugin for WordPress, Blogger...