Microsofts Visual Basic ( VBA ) er en bare- bones og tidlig programmeringsspråk utviklet for å bidra til å skape desktop-applikasjoner , tilrettelegge data sortering og aktivere generering av rapporter basert på data . Du kan bruke denne også bruke VBA til å lage en pivot tabell for å oppsummere data i forbindelse med et regnearkprogram som Microsoft Excel. Ved hjelp av en liten bit med VBA-kode , kan du opprette en pivot fra en eksisterende data tabellen relativt enkelt. Instruksjoner
en

Initiere VBA script ved å skrive følgende : en

Create_Pivot_Table_From_Cache ( )
2

Angi metoder for pivot ved å følge med followinf tre linjer med VBA-kode :

Dim OPC Som PivotCache

Dim opt Som pivottabell

Dim OWS Som regneark
3

Spesifiser funksjonene til OPC , oPT , og OWS ved å legge til følgende linjer med kode :

OWS = ActiveSheet

OPC = ActiveWorkbook.PivotCaches.Create ( xlDatabase , oWS.UsedRange )
< p> oPT = oPC.CreatvePivotTable ( oWS. [ D20 ], " Pivot fra Cache " , sann)
4

Angi hvordan feltene skal pivot , eller beregne data , ved hjelp av følgende linjer med kode . Merk at i dette eksempelet , kan Kolonnen feltnavnene forskjellig fra din.

OPT.AddFields ( oPT.PivotFields ( "prisen") . Navn , etter

oPT.PivotFields ( "Produktet" ) . Name)

oPT.AddDataField ( oPT.PivotFields ( "Type "), " Product Type" , xlSum )
5

Utfør VBA script i et kompatibelt program som Excel, og vise den genererte svinges bordet .