VBA - Päivitä pivot -taulukko / kaikki pivot -taulukot

Tämä opetusohjelma osoittaa, miten pivot -taulukko tai kaikki pivot -taulukot päivitetään VBA: n avulla.

Pivot -taulukot ovat poikkeuksellisen tehokas Excelin datatyökalu. Pivot -taulukoiden avulla voimme analysoida ja tulkita suuria tietomääriä ryhmittelemällä ja tiivistämällä kenttiä ja rivejä.

Kun luomme Pivot -taulukon, tiedot tallennetaan ns. Pivot -taulukon välimuistiin. Tiedot tallennetaan siis tietokoneen välimuistiin, mikä nopeuttaa Pivot -taulukkoa.

Jos pivot -taulukon tietolähde päivitetään, itse pivot -taulukko ei päivity. Excelin käyttäjän on napsautettava Päivitä kaikki Napsauta valintanauhan Data -välilehteä päivittääksesi pivot -taulukon lähdetiedot.

Vaihtoehtoisesti voimme kirjoittaa makroja VBA: han, joka päivittää tiedot puolestamme!

Päivitä kaikki tietoyhteydet

Yksinkertaisin tapa päivittää tiedot on käyttää VBA: ta jäljittelemään mitä Päivitä kaikki -painike toimii valintanauhassa.

123 Sub RefreshConnections ()ActiveWorkbook.RefreshAllEnd Sub

Tämä menetelmä päivittää kaikki yhteydet mihin tahansa aktiivisen työkirjan dataan. Se ei myöskään päivitä vain yhtä Pivot -taulukkoa, vaan päivittää useita pivot -taulukoita, jos sinulla on useampi kuin yksi yhteys eri tietojoukkoihin.

Päivitä kaikki pivot -taulukot

Jos haluat päivittää vain työkirjamme Pivot -taulukot, mutta sulkea pois kaikki muut tietoyhteydet, voimme käyttää menetelmää nimeltä Päivitä taulukko.

Jos työkirjassamme on useita pivot -taulukoita, meidän on selattava kaikki pivot -taulukot, jotta voimme päivittää ne. Tätä varten ilmoitamme ensin pivot -taulukon muuttujan ja luomme sitten jokaiselle silmukalle silmukan kaikkien aktiivisen työkirjan pivot -taulukoiden läpi.

123456 AlipäivitysPivotsOnly ()Dim tblPivot pivot -taulukkonaJokaiselle tblPivotille ActiveWorkbookissatblPivot.RefreshTableSeuraava tblPivotEnd Sub

Voimme käyttää samanlaista makroa päivittämään Pivot -taulukoita Aktiivinen arkki eikä koko työkirjaa. Selaamme sitten Pivot -taulukoita ActiveSheet pikemminkin kuin ActiveWorkbook.

123456 AlivirkkausActiveSheetPivotsOnly ()Dim tblPivot pivot -taulukkonaJokaiselle ActiveSheet.Pivot -taulukon tblPivotilletblPivot.RefreshTableSeuraava tblPivotEnd Sub

Tämä makro olisi hyödyllisin, jos meillä olisi siihen helppo pääsy ActiveSheet. Tätä varten voimme luoda taulukkoon painikkeen makron suorittamiseksi.

Päivitä yksi pivot -taulukko

Jos haluamme vain päivittää käsiteltävän Pivot -taulukon eikä kaikkia muita työkirjan Pivot -taulukoita, meidän on tunnistettava erityinen Pivot -taulukko. Tämä on tietysti niin kauan kuin tiedät Pivot -taulukon nimen - tässä tapauksessa Pivot -taulukko 1.

123 Osa RefreshOneTableActiveSheet.PivotTables ("PivotTable1"). RefreshTableEnd Sub

Pivot -taulukon välimuistin päivittäminen

Jos työkirjassamme on useita Pivot -taulukoita, mutta ne kaikki käyttävät samoja tietoja, voimme päivittää Pivot -taulukon välimuistin varsinaisen Pivot -taulukon päivittämisen sijaan. Välimuistin päivittäminen päivittää sitten automaattisesti kaikki pivot -taulukot, jotka käyttävät välimuistin sisältämiä tietoja.

123456 Sub RefreshCache ()Himmennä chPivot PivotCacheksiJokaista chPivot ActiveWorkbook.PivotCachesPäivitä chPivotSeuraava chPivotEnd Sub
wave wave wave wave wave