Sommario
In questo articolo vi mostrerò come potete Aggiornare tutte le tabelle pivot del foglio di lavoro o della cartella di lavoro con VBA in Excel. Imparerete anche a aggiornare una singola tabella Pivot , così come il Tabella pivot cache.
Aggiornare tutte le tabelle pivot con VBA in Excel (vista rapida)
Dim Table As PivotTable For Each Table In ActiveWorkbook.PivotTables Table.RefreshTable Next Table
In questo modo si aggiornano tutte le Tabelle pivot della cartella di lavoro attiva.
Scarica il quaderno di esercizi
Scaricate questo quaderno di esercizi per esercitarvi durante la lettura di questo articolo.
Aggiorna tutte le tabelle pivot.xlsm4 modi per aggiornare tutte le tabelle pivot con VBA in Excel
A Tabella pivot è un tipo speciale di tabella in un foglio di lavoro Excel che contiene due categorie di dati, intitolate Fila e Valore rispettivamente.
Tutte le colonne della tabella sono classificate in queste due categorie.
Viene generato automaticamente da un insieme di dati se si seleziona l'insieme di dati e si va alla voce Inserisci> Tabella pivot nella barra degli strumenti di Excel.
Oggi il nostro obiettivo è quello di imparare a rinfrescare tutte le Tabelle pivot di un foglio di lavoro o di una cartella di lavoro con VBA in Excel.
1. Aggiornare una singola tabella pivot in Excel
Per prima cosa, impareremo ad aggiornare un singolo file Tabella pivot .
Per aggiornare un singolo Tabella pivot prima di tutto, è necessario riferirsi ad esso come ad una Tabella pivot oggetto.
Si deve quindi utilizzare il metodo AggiornaTabella metodo di VBA .
Qui abbiamo un Tabella pivot chiamato Tabella pivot1 nel foglio di lavoro attivo. (Fare clic qui per conoscere come ottenere il nome della tabella Pivot ).
Per aggiornarlo, dobbiamo utilizzare le seguenti righe di codice:
Dim Table1 As PivotTable Set Table1 = ActiveSheet.PivotTables("PivotTable1") Table1.RefreshTable
Eseguire il codice e aggiornare il file Tabella pivot chiamato Tabella pivot1 nel foglio di lavoro attivo.
Per saperne di più: Come aggiornare automaticamente la tabella pivot in Excel (2 metodi)
2. Aggiornare tutte le tabelle pivot di un foglio di lavoro in Excel
Ora aggiorneremo tutti i file Tabelle pivot di un foglio di lavoro con VBA .
Per aggiornare tutte le Tabelle pivot del foglio di lavoro attivo, è necessario iterare attraverso ciascun Tabella pivot del ActiveSheet.PivotTables Quindi utilizzare l'oggetto AggiornaTabella metodo.
Dim Table As PivotTable For Each Table In ActiveSheet.PivotTables Table.RefreshTable Next Table
Eseguite il codice e aggiornare tutte le tabelle pivot del foglio di lavoro attivo.
Per saperne di più: La tabella pivot non si aggiorna (5 problemi e soluzioni)
3. Aggiornare tutte le tabelle pivot di una cartella di lavoro in Excel
È inoltre possibile aggiornare tutte le Tabelle pivot di una cartella di lavoro in Excel.
Per aggiornare tutte le Tabelle pivot della cartella di lavoro attiva, iterare ogni tabella in base al parametro ActiveWorkbook.PivotTables oggetto di VBA Quindi utilizzare il comando AggiornaTabella metodo.
Dim Table As PivotTable For Each Table In ActiveWorkbook.PivotTables Table.RefreshTable Next Table
Questo codice aggiornerà tutti i file Tabelle pivot della cartella di lavoro attiva.
Per saperne di più: Come aggiornare automaticamente una tabella pivot quando i dati di origine cambiano
4. Aggiornare la cache della tabella pivot con VBA in Excel
Se si dispone di più Tabelle pivot nella cartella di lavoro che utilizzano gli stessi dati, è meglio aggiornare il file Cache della tabella pivot piuttosto che aggiornare la pagina Tabella pivot .
Per aggiornare il Cache della tabella pivot , iterare attraverso ogni Cache della tabella pivot della cartella di lavoro attiva con l'opzione ActiveWorkbook.PivotCaches oggetto.
Quindi utilizzare il parametro R efresh metodo di VBA .
Dim Cache As PivotCache For Each Cache In ActiveWorkbook.PivotCaches Cache.Refresh Next Cache
Aggiornerà tutti i Cache della tabella pivot dalla cartella di lavoro attiva.
Per saperne di più: Come aggiornare automaticamente la tabella Pivot senza VBA in Excel (3 metodi intelligenti)
Cose da ricordare
Qui abbiamo mostrato di aggiornare il Tabelle pivot solo dal foglio di lavoro o dalla cartella di lavoro attiva. Se si desidera aggiornare i dati da una cartella di lavoro o da un foglio di lavoro non attivo, utilizzare il nome del foglio di lavoro o della cartella di lavoro al posto dell'opzione Foglio attivo o il Libro di lavoro attivo oggetto.
Ad esempio, per aggiornare tutti i Tabelle pivot da Foglio1 , utilizzare Per ogni tabella in Worksheets("Foglio1").PivotTables .
E per rinfrescarsi da Libro di lavoro1 , utilizzare Per ogni tabella in Workbooks("Workbook1").PivotTables .
Conclusione
Utilizzando questi metodi, è possibile aggiornare tutti i dati di Tabelle pivot da un foglio di lavoro o da una cartella di lavoro con VBA Avete domande? Non esitate a chiedercele.