Microsofts Visual Basic ( VBA ) er en bare-bone og tidlig programmeringssprog udviklet til at hjælpe med at skabe desktop applikationer, lettere data sortering og muliggøre generering af rapporter baseret på data. Du kan bruge denne også bruge VBA til at oprette en pivottabel til at opsummere data i forbindelse med et regnearksprogram som Microsoft Excel. Brug en lille stump VBA-kode , kan du oprette en pivot fra en eksisterende datatabel forholdsvis let. Instruktioner
1
Indled VBA script ved at skrive følgende : Hej
Create_Pivot_Table_From_Cache ()
2
De metoder til omdrejningspunktet ved at følge med followinf tre linjer VBA-kode :
Dim OPC Som PivotCache
Dim opt, idet pivottabeller
Dim OWS Som Regneark
3
Angiv funktioner OPC oPT og OWS ved at tilføje følgende linjer kode :
OWS = ActiveSheet
OPC = ActiveWorkbook.PivotCaches.Create ( xlDatabase , oWS.UsedRange )
< p> oPT = oPC.CreatvePivotTable ( oWS. [ D20 ] , " Pivot fra Cache " eller sand)
4
Angiv, hvordan felterne skal pivot eller beregne data , ved hjælp af følgende linjer kode . Bemærk, at i dette eksempel, kan datakolonnen feltnavne afvige fra din.
OPT.AddFields ( oPT.PivotFields ( "Prisen") . Navn,
oPT.PivotFields ( "Produkt" ) . Name)
oPT.AddDataField ( oPT.PivotFields ( "Type "), " Product Type" , xlSum )
5
Udfør VBA script i et kompatibelt program som Excel , og se den genererede drejes bordet.