Ovaj će vodič pokazati kako osvježiti zaokretnu tablicu ili sve zaokretne tablice pomoću VBA.
Zaokretne tablice iznimno su snažan podatkovni alat programa Excel. Zaokretne tablice omogućuju nam analizu i tumačenje velikih količina podataka grupiranjem i sažimanjem polja i redaka.
Kad stvorimo zaokretnu tablicu, podaci se spremaju u ono što je poznato kao predmemorija zaokretne tablice. Podaci se stoga spremaju u predmemoriju računala što ubrzava zaokretnu tablicu.
Ako je izvor podataka zaokretne tablice ažuriran, sama zaokretna tablica se ne ažurira. Korisnik u Excelu mora kliknuti na Osvježi sve na kartici Podaci na vrpci za osvježavanje izvornih podataka zaokretne tablice.
Alternativno, možemo napisati makronaredbe u VBA koje će ažurirati podatke umjesto nas!
Osvježite sve podatkovne veze
Najjednostavniji način osvježavanja podataka je korištenje VBA za oponašanje onoga što Osvježi sve gumb radi na vrpci.
| 123 | Sub RefreshConnections ()ActiveWorkbook.RefreshAllKraj podm |
Ova metoda će osvježiti sve veze sa svim podacima u radnoj knjizi koje imate aktivne. Također neće osvježiti samo jednu zaokretnu tablicu, nego će osvježiti više zaokretnih tablica ako imate više od jedne povezane na različite skupove podataka.
Osvježite sve zaokretne tablice
Da bismo osvježili samo zaokretne tablice u našoj radnoj knjizi, ali isključili sve druge podatkovne veze, možemo upotrijebiti metodu tzv RefreshTable.
Ako u radnoj knjizi imamo više zaokretnih tablica, morali bismo proći kroz sve zaokretne tablice kako bismo ih sve osvježili. Da bismo to učinili, najprije deklariramo varijablu zaokretne tablice, a zatim stvaramo za svaku petlju za petlju kroz sve zaokretne tablice u aktivnoj radnoj knjizi.
| 123456 | Sub RefreshPivotsOnly ()Zatamnite tblPivot kao zaokretnu tablicuZa svaki tblPivot u ActiveWorkbook.PivotTablicetblPivot.RefreshTableSljedeći tblPivotKraj podm |
Sličnu makronaredbu možemo upotrijebiti za osvježavanje zaokretnih tablica u našoj Aktivni list nego cijela radna bilježnica. Zatim bismo prošli kroz zaokretne tablice u ActiveSheet nego ActiveWorkbook.
| 123456 | Sub RefreshActiveSheetPivotsOnly ()Zatamnite tblPivot kao zaokretnu tablicuZa svaki tblPivot u ActiveSheet.PivotTablicamatblPivot.RefreshTableSljedeći tblPivotKraj podm |
Ovaj bi makro bio najkorisniji da mu imamo lak pristup na svom ActiveSheet. Da bismo to postigli, možemo stvoriti gumb na listu za pokretanje makronaredbe.
Osvježite jednu zaokretnu tablicu
Ako samo želimo osvježiti zaokretnu tablicu na kojoj radimo, a ne sve ostale zaokretne tablice u radnoj knjizi, moramo identificirati određenu zaokretnu tablicu. To je naravno sve dok znate naziv zaokretne tablice - u ovom slučaju Zaokretna tablica1.
| 123 | Pod RefreshOneTableActiveSheet.PivotTables ("Zaokretna tablica1"). RefreshTableKraj podm |
Osvježavanje predmemorije zaokretne tablice
Ako u radnoj knjizi imamo više zaokretnih tablica, ali sve one koriste iste podatke, možemo osvježiti predmemoriju zaokretne tablice umjesto osvježavanja stvarne zaokretne tablice. Osvježavanje predmemorije automatski će osvježiti sve zaokretne tablice koje koriste podatke sadržane u predmemoriji.
| 123456 | Sub RefreshCache ()Zatamni chPivot kao zaokretnu predmemorijuZa svaki chPivot u ActiveWorkbook.PivotCacheschPivot.OsvježiSljedeći chPivotKraj podm |
