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 |