Astuce: Les autres langues sont Google-Traduction. Vous pouvez visiter le English version de ce lien.
Se connecter
x
or
x
x
S'enregistrer
x

or

Comment changer plusieurs paramètres de champ dans le tableau croisé dynamique?

Lorsque vous créez un tableau croisé dynamique dans une feuille de calcul, après avoir déplacé les champs vers le Valeurs liste dans le Liste de champs de tableau croisé dynamique, vous pouvez obtenir tout de même Compter fonctionne comme suivant capture d'écran montré. Mais maintenant, vous voulez le Somme de fonction pour remplacer le Compter de la fonction à la fois, comment pourriez-vous changer le calcul de plusieurs champs de tableau croisé dynamique à la fois dans Excel?

doc-change-field-setting-1

Modifier les paramètres de champ dans le tableau croisé dynamique manuellement un par un

Modifier plusieurs paramètres de champ dans le tableau croisé dynamique avec le code VBA


flèche bleue droite bulle Modifier les paramètres de champ dans le tableau croisé dynamique manuellement un par un


Dans Excel, vous pouvez modifier le calcul des paramètres de champ en changeant la fonction un par un dans le Paramètres du champ de valeur dialogue, s'il vous plaît faites comme ceci:

1. Sélectionnez un champ dans la zone Valeurs pour lequel vous souhaitez modifier la fonction de résumé dans le tableau croisé dynamique, et cliquez avec le bouton droit pour choisir Paramètres du champ de valeur, voir capture d'écran:

doc-change-field-setting-1

2. Puis dans le Paramètres du champ de valeur boîte de dialogue, sélectionnez un type de calcul que vous souhaitez utiliser sous Résumer la valeur par onglet, voir capture d'écran:

doc-change-field-setting-1

3. Et puis cliquez OK pour fermer cette boîte de dialogue, et vous pouvez voir votre fonction Count a été changée en fonction Sum, voir capture d'écran:

doc-change-field-setting-1

4. Répétez les étapes ci-dessus pour modifier les paramètres de calcul d'autres champs un par un.

Remarque: Vous pouvez également modifier les paramètres du champ en cliquant avec le bouton droit sur une cellule de champ et choisir Résumer les valeurs par et sélectionnez un calcul dont vous avez besoin dans les menus contextuels.

doc-change-field-setting-1


flèche bleue droite bulle Modifier plusieurs paramètres de champ dans le tableau croisé dynamique avec le code VBA

La méthode ci-dessus prendra du temps et sera fastidieuse s'il y a beaucoup de calculs sur le terrain qui doivent être changés, ici, je peux vous présenter un code pour changer plusieurs paramètres en même temps.

1. Cliquez sur n'importe quelle cellule dans votre tableau croisé dynamique.

2. Maintenez le ALT + F11 clés, et il ouvre la Microsoft Visual Basic pour Applications fenêtre.

3. Cliquez insérer > Moduleet collez le code suivant dans le Fenêtre du module.

Code VBA: Modifier plusieurs paramètres de champ dans le 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. Puis appuyez F5 clé pour exécuter ce code, et tous les paramètres de champ dans votre tableau pivotant sélectionné ont été convertis à votre calcul de besoin à la fois, voir les captures d'écran:

doc-change-field-setting-1
-1
doc-change-field-setting-6

Note: Dans le code ci-dessus, vous pouvez modifier la fonction Somme à tous les autres calculs, tels que Moyenne, Max, Min comme vous le souhaitez. Vous avez juste besoin de changer la somme dans ces scripts: Public Sub SetDataFieldsToSum () et .Fonction = xlSum à d'autres fonctions.



Outils de productivité recommandés

Office Tab

étoile d'or1 Apportez des onglets pratiques à Excel et à d'autres logiciels Office, tout comme Chrome, Firefox et Internet Explorer.

Kutools for Excel

étoile d'or1 Incroyable! Augmentez votre productivité dans les minutes 5. Ne nécessite pas de compétences particulières, économisez deux heures par jour!

étoile d'or1 300 Nouvelles fonctionnalités pour Excel, rendent Excel facile et puissant:

  • Fusionner des cellules / lignes / colonnes sans perdre de données.
  • Combiner et consolider plusieurs feuilles et classeurs.
  • Comparez les gammes, copiez plusieurs gammes, convertissez le texte en date, l'unité et la conversion de devise.
  • Compter par couleurs, sous-totaux de recherche, tri avancé et super filtre,
  • Plus Sélectionner / Insérer / Supprimer / Texte / Format / Lier / Commenter / Classeurs / Feuilles de calcul Outils ...

Capture d'écran de Kutools pour Excel

Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
  • To post as a guest, your comment is unpublished.
    Rich · 5 months ago
    I've used the VBA solution with great success in the past, but it doesn't work with the data model. Do you know if there is a solution for that?
  • To post as a guest, your comment is unpublished.
    pierrr · 5 months ago
    How about Average, Stddev, Max and Min for each field successively?
  • To post as a guest, your comment is unpublished.
    Tarryn · 1 years ago
    Brilliant!!!! Thank you so much this was amazing!!!
  • To post as a guest, your comment is unpublished.
    Harendra Singh Kuntal · 1 years ago
    SuperB... I've been frustrated with this problem
  • To post as a guest, your comment is unpublished.
    Sonia · 1 years ago
    Amazing - I am no hot shot with VBA and feel like a champion - this has been driving me crazy for a long time! Thank you