|
Visual Basic de Microsoft ( VBA) est un langage de programmation bare-bones et au début développé pour aider à créer des applications de bureau , faciliter le tri des données et permettre la génération de rapports basés sur les données . Vous pouvez utiliser cette également utiliser VBA pour créer un tableau croisé dynamique pour synthétiser les données en conjonction avec un tableur comme Microsoft Excel. Avec un petit bout de code VBA , vous pouvez créer un pivot d'une table de données existante relativement facilement . Instructions
1 Lancer le script VBA en tapant la commande suivante :
Create_Pivot_Table_From_Cache ()
2 préciser les modalités de l' articulation par la suite avec le followinf trois lignes de code VBA :
Dim OPC Comme PivotCache
TPo As tableau croisé dynamique
OWS As Feuille
3 Précisez les fonctions du Commissariat, opt et OWS en ajoutant les lignes de code suivantes:
OWS = ActiveSheet
oPC = ActiveWorkbook.PivotCaches.Create ( xlDatabase , oWS.UsedRange )
< p> OPT = oPC.CreatvePivotTable ( oWS. [ D20 ] , " pivot de Cache ", True )
4 préciser comment les champs doivent pivot, ou calculer des données , en utilisant les lignes de code suivantes . Notez que dans cet exemple, les noms de champs de colonnes de données peuvent différer de la vôtre.
OPT.AddFields ( oPT.PivotFields ( «Prix» ) . Nom,
oPT.PivotFields ( «Produit» ) . Name)
oPT.AddDataField ( oPT.PivotFields ( "Type" ) , "Type de produit " , xlSum )
5 Exécuter le script VBA dans un programme compatible, tel que Excel, et afficher le tableau généré pivoter .
|
