Innholdsfortegnelse
Implementering av VBA-makro er den mest effektive, raskeste og sikreste metoden for å kjøre enhver operasjon i Excel. I denne artikkelen vil vi vise deg hvordan du oppdaterer pivottabellen i Excel ved hjelp av VBA.
Last ned arbeidsbok
Du kan laste ned gratis øv på Excel-arbeidsbok herfra.
Oppdater pivottabell med VBA.xlsm
5 eksempler for å oppdatere pivottabell med VBA i Excel
Følgende er eksemplet på pivottabellen vår som vi skal bruke gjennom hele artikkelen og viser deg 5 forskjellige eksempler på forfriskende pivottabeller i Excel med VBA kode.
1. VBA for å oppdatere én pivottabell i Excel
Hvis du vil oppdatere bare én pivottabell i Excel-regnearket,
- Trykk Alt + F11 på tastaturet eller gå til fanen Utvikler -> Visual Basic for å åpne Visual Basic Editor .
- I popup-kodevinduet, fra menylinjen , klikk Sett inn -> Modul .
- Kopiér følgende kode og lim den inn i kodevinduet.
1411
Din kode er nå klar til å kjøre.
Her er PivotTable1 vårt pivottabellnavn. Du skriver navnet som pivottabellen din har.
- Trykk F5 på tastaturet eller fra menylinjen velg Kjør - > Kjør Sub/UserForm . Du kan også bare klikke på det lille Spill-ikonet iundermenylinjen for å kjøre makroen.
Dette vil oppdatere pivottabellen i det eksisterende Excel-regnearket ditt.
Les mer: Pivottabellen oppdateres ikke (5 problemer og løsninger)
2. Makro for å oppdatere alle pivottabeller i det aktive regnearket
For å oppdatere alle pivottabeller i det aktive regnearket , følg trinnene nedenfor.
- Samme På samme måte som før, åpne Visual Basic Editor fra kategorien Utvikler og Sett inn en modul i kodevinduet.
- I kodevinduet kopierer du følgende kode og limer den inn.
1211
Koden din er nå klar til å kjøre.
- Kjør makroen og alle pivottabellene i det aktive regnearket vil bli oppdatert.
Les mer: Hvordan oppdaterer du alle pivottabeller i Excel
3. VBA-kode for å oppdatere alle pivottabeller i flere arbeidsbøker
Hvis du vil oppdatere alle pivottabeller i flere arbeidsbøker samtidig med VBA -kode, trinnene er:
- Åpne Visual Basic Editor fra kategorien Utvikler og Sett inn en modul i kodevindu.
- I kodevinduet kopierer du følgende kode og limer den inn.
3334
Koden din er nå klar til å kjøre.
- Kjør koden og alle pivottabellene i alle dine åpne Excel-arbeidsbøker vil bli oppdatert.
Husk å beholde altarbeidsbøker åpnes mens du kjører denne koden.
Lignende avlesninger
- Hvordan redigere en pivottabell i Excel (5 metoder) )
- Oppdater pivottabellområdet (5 egnede metoder)
- Hvordan oppdaterer du en pivottabell automatisk når kildedata endres
4. Oppdatere pivottabellbufferen med VBA i Excel
Hvis du har flere pivottabeller i arbeidsboken som bruker de samme dataene, kan du oppdatere bare pivottabellbufferen i stedet for å oppdatere selve pivottabellen hele tiden. Oppdatering av hurtigbufferen tømmer automatisk bufferminnet for alle pivottabellene ved å bruke den samme datatilkoblingen i hurtigbufferen.
Trinn for å gjøre det er,
- Åpne Visual Basic Editor fra kategorien Utvikler og Sett inn en modul i kodevinduet.
- I kodevinduet kopierer du følgende kode og lim den inn.
3614
Koden din er nå klar til å kjøre.
- Kjør koden og alt pivottabellbufferminnene vil bli tømt.
Les mer: Hvordan automatisk oppdatere pivottabell uten VBA i Excel (3 smarte metoder)
5. Oppdater pivottabell automatisk mens du endrer data med VBA-makro
Hva om du har en pivottabell som har en stor mengde data og alt du vil er å oppdatere noen få data mens du har hele tabellen urørt . I Excel kan du oppdatere automatiskpivottabell mens du oppdaterer data med VBA .
- Åpne Visual Basic Editor fra Utvikleren.
- På venstre side av editoren vil det være en Prosjektutforsker -rute som har alle navnene på regnearket.
- I Prosjektutforsker dobbelt- klikk på arknavnet som inneholder pivottabellen.
- Kodevinduet vil dukke opp hvor vi skal lage en hendelsesmakro. Velg Regneark fra rullegardinboksen Objekt til venstre for kodemodulen. Dette vil legge til en Worksheet_SelectionChange -hendelse til modulen, vi trenger den faktisk ikke, så vi vil slette denne kodebiten senere.
- Klikk deretter på Prosedyre rullegardinlisten og velg Endre . Dette legger til en ny hendelse øverst i kodemodulen kalt Worksheet_Change . Vi vil skrive koden vår her så slett koden generert av Worksheet_SelectionChange
- Kopier nå følgende kode og lim den inn i Worksheet_Change
3204
Koden din er nå klar til å kjøre.
Her er PivotTbl regnearket navn i Excel-arbeidsboken vår og pivottabell1 er pivottabellnavnet vårt. Du skriver navnet som regnearket og pivottabellen har.
- Nå hver gang du endrer dataene i den opprinnelige datatabellen i regnearket, vil dataene i pivottabell vilautomatisk oppdateres.
Les mer: Hvordan autooppdater pivottabell i Excel
Konklusjon
Denne artikkelen viste hvordan du oppdaterer pivottabellen i Excel med VBA . Jeg håper denne artikkelen har vært veldig nyttig for deg. Spør gjerne hvis du har spørsmål angående emnet.