Microsoft Visual Basic ( VBA ) är en hake och tidig programmeringsspråk utvecklat för att hjälpa till att skapa skrivbordsprogram , underlätta uppgifter sortering och möjliggör generering av rapporter baserade på data. Du kan använda denna även använda VBA för att skapa en pivottabell sammanfatta data i samband med ett kalkylprogram som Microsoft Excel . Använd en liten snutt av VBA-kod , kan du skapa en pivot från en befintlig datatabell relativt lätt . Instruktioner
1
Initiera VBA script genom att skriva följande :
Create_Pivot_Table_From_Cache ( )
2
Ange metoderna för leden genom att följa med followinf tre rader VBA-kod :
Dim opc Som PivotCache
Dim opt vilket pivottabeller
Dim OWS Som arbetsblad
3
Specificera funktionerna av OPC , opt och OWS genom att lägga till följande rader med kod :
OWS = ActiveSheet
OPC = ActiveWorkbook.PivotCaches.Create ( xlDatabase , oWS.UsedRange ) katalog
oPT = oPC.CreatvePivotTable ( oWS. [ D20 ] , " Pivot från Cache " , sant)
4
Ange hur fälten ska svänga , eller beräkna data , genom att använda följande kodrader . Notera att i detta exempel , kan datakolumnen fältnamn skilja sig från din.
OPT.AddFields ( oPT.PivotFields ( " Priset" ) . Namn , Porr
oPT.PivotFields ( " Produkt " ) . Name ) katalog
oPT.AddDataField ( oPT.PivotFields ( " Type " ) , " Product Type " , xlSum )
5
Exekvera VBA skript inom ett kompatibelt program , t.ex. Excel , och visa den genererade svängs bordet .
