Comment faire pour créer un tableau croisé dynamique utilisant VBA Excel

Les tableaux croisés dynamiques sont l'une des caractéristiques les plus puissantes de Microsoft Excel. Ils vous permettent de résumer, de tri et de manipuler de grands ensembles de données complexes d'une manière qui les rend beaucoup plus facile à analyser. Si vous vous trouvez la création d'un grand nombre de tableaux croisés dynamiques ou les créer fréquemment, vous pourrez peut-être gagner du temps en écrivant une Visual Basic pour Applications script qui peut les créer automatiquement.

Instructions

  1. 1

    Créer une nouvelle feuille de calcul Excel. Si vous utilisez Microsoft Excel 2007 ou plus tard, aller à la "Vue" onglet sur le ruban et faites un clic "Macros-" si vous utilisez une version antérieure d'Excel, cliquez sur le "Outils" menu, aller à "Macro" et cliquez sur "Macros." Cela fera apparaître la boîte de dialogue Macro.

  2. 2

    Tapez un nouveau nom de la macro et cliquez sur "Créer." Vous devriez voir le Visual Basic pour Applications éditeur apparaît avec un nouveau sous-programme portant le nom que vous avez choisi.

  3. 3

    Ajouter du code pour récupérer une référence à votre feuille de calcul:

    Set feuille de calcul = ThisWorkbook.Worksheets (1)

    Si vos données ne sont pas sur la première feuille de calcul dans le classeur, changer le numéro ci-dessus de 1 à l'index de la feuille de calcul qui contient vos données.

  4. 4

    Déterminer la gamme des données qui seront utilisées dans le tableau croisé dynamique:

    gamme de Set = worksheet.UsedRange

  5. 5

    Créer l'objet tableau croisé dynamique:

    worksheet.PivotTableWizard (SourceType: = xlDatabase, Sourcedata: = intervalle, TableDestination: = worksheet.Range ("B5"))

» » » » Comment faire pour créer un tableau croisé dynamique utilisant VBA Excel