Comment modifier plusieurs paramètres de champ dans un tableau croisé dynamique ?
Lorsque vous créez un tableau croisé dynamique dans une feuille de calcul, après avoir fait glisser les champs vers la liste Valeurs dans la liste des champs du tableau croisé dynamique, vous pourriez obtenir toutes les fonctions Compter comme le montre la capture d'écran suivante. Mais maintenant, vous souhaitez que la fonction Somme remplace la fonction Compter immédiatement. Comment pouvez-vous changer le calcul de plusieurs champs du tableau croisé dynamique en même temps dans Excel ?
Modifier manuellement les paramètres des champs dans le tableau croisé dynamique un par un
Modifier plusieurs paramètres de champ dans un tableau croisé dynamique avec du code VBA
Modifier manuellement les paramètres des champs dans le tableau croisé dynamique un par un
Dans Excel, vous pouvez modifier le calcul des paramètres des champs en changeant la fonction une par une dans la boîte de dialogue Paramètres des champs de valeur, veuillez procéder comme suit :
1. Sélectionnez un champ dans la zone Valeurs pour lequel vous souhaitez modifier la fonction de résumé dans le tableau croisé dynamique, puis faites un clic droit et choisissez Paramètres des champs de valeur, voir la capture d'écran :
2. Ensuite, dans la boîte de dialogue Paramètres des champs de valeur, sélectionnez un type de calcul que vous souhaitez utiliser sous l'onglet Résumer les valeurs par, voir la capture d'écran :
3. Cliquez ensuite sur OK pour fermer cette boîte de dialogue, et vous pouvez voir que votre fonction Compter a été changée en fonction Somme, voir la capture d'écran :
4. Répétez les étapes ci-dessus pour modifier les paramètres de calcul des autres champs un par un.
Remarque : Vous pouvez également modifier les paramètres des champs en faisant un clic droit sur une cellule de champ et choisir Résumer les valeurs par, puis sélectionner un calcul dont vous avez besoin à partir des menus contextuels.
Modifier plusieurs paramètres de champ dans un tableau croisé dynamique avec du code VBA
La méthode ci-dessus peut être chronophage et fastidieuse s'il y a beaucoup de calculs de champs à modifier. Ici, je peux vous présenter un code pour modifier plusieurs paramètres de champ en même temps.
1. Cliquez sur n'importe quelle cellule de votre tableau croisé dynamique.
2. Maintenez les touches ALT + F11 enfoncées, et cela ouvre la fenêtre Microsoft Visual Basic pour Applications.
3. Cliquez sur Insertion > Module, et collez le code suivant dans la fenêtre Module.
Code VBA : Modifier plusieurs paramètres de champ dans un tableau croisé dynamique
Public Sub SetDataFieldsToSum()
'Update 20141127
Dim xPF As PivotField
Dim WorkRng As Range
Set WorkRng = Application.Selection
With WorkRng.PivotTable
.ManualUpdate = True
For Each xPF In .DataFields
With xPF
.Function = xlSum
.NumberFormat = "#,##0"
End With
Next
.ManualUpdate = False
End With
End Sub
4. Appuyez ensuite sur la touche F5 pour exécuter ce code, et tous les paramètres des champs dans votre tableau croisé dynamique sélectionné auront été convertis au calcul dont vous avez besoin en une seule fois, voir les captures d'écran :
|
 |
 |
Remarque : Dans le code ci-dessus, vous pouvez changer la fonction Somme pour tout autre calcul, tel que Moyenne, Maximum, Minimum selon vos besoins. Il vous suffit de remplacer Somme dans ces scripts : Public Sub SetDataFieldsToSum() et .Function = xlSum par d'autres fonctions.
Meilleurs outils de productivité pour Office
Améliorez vos compétences Excel avec Kutools pour Excel, et découvrez une efficacité incomparable. Kutools pour Excel propose plus de300 fonctionnalités avancées pour booster votre productivité et gagner du temps. Cliquez ici pour obtenir la fonctionnalité dont vous avez le plus besoin...
Office Tab apporte l’interface par onglets à Office, simplifiant considérablement votre travail.
- Activez la modification et la lecture par onglets dans Word, Excel, PowerPoint, Publisher, Access, Visio et Project.
- Ouvrez et créez plusieurs documents dans de nouveaux onglets de la même fenêtre, plutôt que dans de nouvelles fenêtres.
- Augmente votre productivité de50 % et réduit des centaines de clics de souris chaque jour !
Tous les modules complémentaires Kutools. Une seule installation
La suite Kutools for Office regroupe les modules complémentaires pour Excel, Word, Outlook & PowerPoint ainsi qu’Office Tab Pro, idéal pour les équipes travaillant sur plusieurs applications Office.
- Suite tout-en-un — modules complémentaires Excel, Word, Outlook & PowerPoint + Office Tab Pro
- Un installateur, une licence — installation en quelques minutes (compatible MSI)
- Une synergie optimale — productivité accélérée sur l’ensemble des applications Office
- Essai complet30 jours — sans inscription, ni carte bancaire
- Meilleure valeur — économisez par rapport à l’achat d’add-ins individuels