VBA til að endurnýja snúningstöflu í Excel (5 dæmi)

Hugh West

29-09-2023 Excel snúningstafla
  • Deildu Þessu
Hugh West

Að innleiða VBA macro er áhrifaríkasta, fljótlegasta og öruggasta aðferðin til að keyra hvaða aðgerð sem er í Excel. Í þessari grein munum við sýna þér hvernig á að endurnýja snúningstöfluna í Excel með VBA.

Hlaða niður vinnubók

Þú getur halað niður ókeypis æfðu Excel vinnubók héðan.

Refresh Pivot Table with VBA.xlsm

5 Dæmi til að endurnýja snúningstöflu með VBA í Excel

Eftirfarandi er dæmið um snúningstöfluna okkar sem við munum nota í allri greininni og sýna þér 5 mismunandi dæmi um hressandi pivottöflur í Excel með VBA kóða.

1. VBA til að endurnýja eina snúningstöflu í Excel

Ef þú vilt uppfæra aðeins eina snúningstöflu í Excel vinnublaðinu þínu,

  • Ýttu á Alt + F11 á lyklaborðinu þínu eða farðu í flipann Hönnuði -> Visual Basic til að opna Visual Basic Editor .

  • Í sprettiglugganum, frá valmyndastikunni , smelltu á Setja inn -> Module .

  • Afritu eftirfarandi kóða og límdu hann inn í kóðagluggann. 
2844

Kóðinn þinn er nú tilbúið til að keyra.

Hér, PivotTable1 er Pivot Tafla nafnið okkar. Þú skrifar nafnið sem Pivot Taflan þín hefur.

  • Ýttu á F5 á lyklaborðinu þínu eða á valmyndastikunni veldu Run - > Keyra Sub/UserForm . Þú getur líka bara smellt á litla Play táknið íundirvalmyndarstikuna til að keyra makróið.

Þetta mun uppfæra pivot-töfluna í núverandi Excel vinnublaði þínu.

Lestu meira: Snúningstaflan er ekki hressandi (5 mál og lausnir)

2. Fjölvi til að endurnýja allar snúningstöflur í virka vinnublaðinu

Til að endurnýja allar pivottöflur í virka vinnublaðinu skaltu fylgja skrefunum hér að neðan.

  • Sama eins og áður, opnaðu Visual Basic Editor frá flipanum Developer og Settu inn module í kóðaglugganum.
  • Í kóðaglugganum skaltu afrita eftirfarandi kóða og líma hann. 
1262

Kóðinn þinn er nú tilbúinn til að keyra.

  • Keyra fjölvi og allar snúningstöflur í virka vinnublaðinu þínu verða endurnýjaðar.

Lesa meira: Hvernig á að endurnýja allar snúningstöflur í Excel

3. VBA kóða til að endurnýja allar snúningstöflur í mörgum vinnubók

Ef þú vilt uppfæra allar snúningstöflur í mörgum vinnubókum í einu með VBA kóða þá skrefin eru:

  • Opnaðu Visual Basic Editor á flipanum Developer og Settu inn einingu í kóðagluggi.
  • Í kóðaglugganum skaltu afrita eftirfarandi kóða og líma hann. 
7444

Kóðinn þinn er nú tilbúinn til að keyra.

  • Keyddu kóðann og allar pivottöflurnar í öllum opnu Excel vinnubókunum þínum verða endurnýjaðar.

Mundu að halda ölluvinnubækur opnast meðan þú keyrir þennan kóða.

Svipuð lestur

4. Uppfærsla á snúningstöflu skyndiminni með VBA í Excel

Ef þú ert með margar pivot töflur í vinnubókinni sem nota sömu gögnin geturðu aðeins endurnýjað snúningstöflu skyndiminni frekar en að endurnýja raunverulega snúningstöfluna allan tímann. Endurhleðsla skyndiminni hreinsar skyndiminni sjálfkrafa af öllum pivot töflunum með því að nota sömu gagnatengingu í skyndiminni.

Skref til að gera það eru:

  • Opna Visual Basic Editor af flipanum Developer og Settu inn Module í kóðagluggann.
  • Í kóðaglugganum, afritaðu eftirfarandi kóða og líma það. 
5834

Kóðinn þinn er nú tilbúinn til að keyra.

  • Keyra kóðann og allt skyndiminni snúningstöflunnar verða hreinsaðar.

Lesa meira: Hvernig á að endurnýja snúningstöflu sjálfkrafa án VBA í Excel (3 snjallar aðferðir)

5. Sjálfvirk endurnýjun snúningstöflu á meðan gögnum er breytt með VBA Macro

Hvað ef þú ert með pivottöflu sem hefur mikið magn af gögnum og allt sem þú vilt er að uppfæra nokkur gögn á meðan þú hefur alla töfluna ósnerta . Í Excel geturðu uppfært sjálfkrafasnúningstafla meðan gögn eru uppfærð með VBA .

  • Opnaðu Visual Basic Editor frá framleiðandanum.
  • Vinstra megin á ritlinum væri Project Explorer rúða sem hefur öll nöfn vinnublaðsins.
  • Í Project Explorer , tvöfaldur- smelltu á nafn blaðsins sem inniheldur pivot-töfluna.

  • Kóðaglugginn mun birtast þar sem við munum búa til atburðarmaró. Veldu Vinnublað úr Object fellilistanum vinstra megin við kóðaeininguna. Þetta mun bæta Worksheet_SelectionChange atburði við eininguna, við þurfum þess í raun ekki svo við munum eyða þessum kóða síðar.
  • Smelltu síðan á Verklagsreglan fellilistanum og veldu Breyta . Þetta bætir við nýjum atburði efst á kóðaeiningunni sem heitir Worksheet_Change . Við munum skrifa kóðann okkar hér svo eyddu kóðanum sem myndaður er af Worksheet_SelectionChange

  • Afritaðu nú eftirfarandi kóða og límdu hann í Worksheet_Change 
9814

Kóðinn þinn er nú tilbúinn til að keyra.

Hér er PivotTbl vinnublaðið nafn í Excel vinnubókinni okkar og PivotTable1 er Pivot Tafla nafnið okkar. Þú skrifar nafnið sem vinnublaðið þitt og snúningstafla hafa.

  • Nú í hvert skipti sem þú breytir gögnunum í upprunalegu gagnatöflunni í vinnublaðinu þínu, þá verða gögnin í pivot borð munsjálfkrafa uppfært.

Lesa meira: Hvernig á að endurnýja snúningstöflu sjálfkrafa í Excel

Niðurstaða

Þessi grein sýndi þér hvernig á að uppfæra pivot-töfluna í Excel með VBA . Ég vona að þessi grein hafi verið þér mjög gagnleg. Ekki hika við að spyrja ef þú hefur einhverjar spurningar varðandi efnið.

Fyrri færsla Notkun Offset Function í Excel
Næsta færsla Hvernig á að umbreyta fermetra í fermetra í Excel (2 fljótlegar aðferðir)

Hugh West er mjög reyndur Excel þjálfari og sérfræðingur með yfir 10 ára reynslu í greininni. Hann er með BA gráðu í bókhaldi og fjármálum og meistaragráðu í viðskiptafræði. Hugh hefur ástríðu fyrir kennslu og hefur þróað einstaka kennsluaðferð sem auðvelt er að fylgja eftir og skilja. Sérfræðiþekking hans á Excel hefur hjálpað þúsundum nemenda og fagfólks um allan heim að bæta færni sína og skara fram úr í starfi. Í gegnum bloggið sitt deilir Hugh þekkingu sinni með heiminum og býður upp á ókeypis Excel námskeið og netþjálfun til að hjálpa einstaklingum og fyrirtækjum að ná fullum möguleikum.