Un tableau croisé dynamique est utilisée pour synthétiser les données et est couramment utilisé dans des tableurs comme Microsoft Excel. Visual Basic pour Applications est un langage de programmation informatique développé par Microsoft et utilisé pour automatiser des tâches de routine dans les applications Microsoft Office . Vous pouvez avoir besoin d'écrire du code VBA pour supprimer des tableaux croisés dynamiques , si vous avez un classeur avec beaucoup de feuilles et vous devez les supprimer manuellement . En quelques étapes, vous pouvez écrire du code VBA pour supprimer une table de pivot. Instructions
1
Démarrer Microsoft Office Excel et tapez " Colonnes " dans "Données" , "A1" à "B1" , "champ" à "A2" , "12" à "B2 ", " Field2 " à " A3 " , et " 13 " à " B3 " .
Cliquez sur " A1 " , appuyez sur " Ctrl " et " A ", cliquez sur le menu" " et sélectionner " Insert tableau croisé dynamique » . Cliquez sur « OK ».
2
Cochez les cases à côté de "Colonnes » et «Données ».
Sélectionnez l'onglet « Développeur », puis cliquez sur " Visual Basic ". Cliquez sur le menu "Insertion " et sélectionnez " Module ".
3
Copier et coller le code ci-dessous dans votre nouveau module pour supprimer le tableau croisé dynamique que vous venez de créer .
< P > deletePivotTable Private Sub ()
PTBL As tableau croisé dynamique
wrkSheet As Feuille
Chaque wrkSheet En ActiveWorkbook.Worksheets
Chaque PTBL En wrkSheet . tableaux croisés dynamiques
Range (" A3 : B6 " ) . Sélectionnez
Selection.Delete Maj : . = xlToLeft
Range (" A1") Sélectionnez
< p > Exit Sub
Suivant PTBL
Suivant wrkSheet
End Sub