Come modificare il sorgente di una tabella pivot di Excel Utilizzando VBA

Microsoft Excel è un foglio di calcolo . Una caratteristica di questo programma è che è possibile utilizzare i fogli di lavoro per memorizzare i dati in modo simile a come si farebbe in un database e quindi fare riferimento a visualizzazioni grafiche dinamiche. Ci sono due tipi di display è possibile utilizzare: tabelle e grafici pivot . Tabelle pivot possono essere utilizzati per ordinare , filtrare e riepilogare i dati . L'unico modo per modificare l'origine dati utilizzata da una tabella pivot , una volta che è stato creato con la procedura guidata è di aggiornarlo dal codice VBA in background . Istruzioni
1

Creare un oggetto tabella pivot in VBA in modo da poter aggiornare la fonte. Copia il codice qui sotto e metterlo nella macro o funzione.

Dim ptMyPivotTable Come pivot
2

Collegate il vostro oggetto con la tabella pivot Tabella pivot effettivo . Copia il codice qui sotto .

PtMyPivotTable = ActiveSheet.PivotTables ( 1)
3

aggiornare la proprietà SourceData del vostro oggetto tabella pivot per i nuovi valori . È possibile farlo copiando il codice VBA in dotazione. Sostituire il campo dati desiderato al posto di " A1 " nell'esempio .

PtMyPivotTable.SourceData = Range (" A1" ) . CurrentRegion.Address ( vero, vero , xlR1C1 , True)

per fare riferimento a un intervallo su un foglio diverso, è possibile utilizzare il seguente codice .

ptMyPivotTable.SourceData = Sheets (" mySheetName " ) . [ A1 ] . CurrentRegion.Address ( vero, vero , xlR1C1 , True)

4

aggiornare i dati effettivamente visualizzati nella vostra tabella pivot utilizzando il comando VBA di seguito .

ptMyPivotTable.RefreshTable
5

rilasciare le risorse utilizzate in l'oggetto tabella pivot impostandolo uguale a Nothing .

ptMyPivotTable = Nothing