Tableau croisé dynamique programmés en VBA et Excel de différentes langues
2 réponses
Jack.R
Bonjour,
J'ai un classeur excel qui contient un tableau croisé dynamique. Un
bouton permet de faire une mise à jour. On ré-importe des données puis
effectue un traitement qui doit se terminer par la mise à jour du
tableau croisé dynamique.
Le classeur fonctionne parfaitement sur un excel français. Si j'utilise
se classeur sur un excel italien, par exemple, cela ne fonctionne plus
et se termine par une erreur de l'application. Cela est dû, entre autre,
aux termes:
- "ligne" devenu "riga"
- "colonne" devenu "colonna"
- "valeur" devenu "valeur"
J'ai donc décider de créer ce tableau dynamiquement en VBA en mettant
les termes anglais mais cela ne marche pas sur le "Nombre de Valeur" qui
devient "Number of Values". J'obtiens une erreur "Impossible de lire la
propriété PivotItems de la classe PivotField".
J'ai essayé aussi avec "Sum of Values", sans plus de succés.
Y a-t-il un moyen de créer dynamiquement un tableau croisé dynamique en
s'affranchissant des problèmes de langue de l'excel utilisé ?
With ActiveSheet
.PivotTables("PivotTable1").DataPivotField.PivotItems("Number of
Values").Position = 1
.PivotTables("PivotTable1").PivotFields("Number of
Values").Function = xlSum
End With
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
MPi
Je n'ai pas beaucoup d'expérience avec les tableaux croisés, mais peut-être pourrais-tu remplacer les termes entre guillemets par des Index ?
Michel
Bonjour,
J'ai un classeur excel qui contient un tableau croisé dynamique. Un bouton permet de faire une mise à jour. On ré-importe des données puis effectue un traitement qui doit se terminer par la mise à jour du tableau croisé dynamique.
Le classeur fonctionne parfaitement sur un excel français. Si j'utilise se classeur sur un excel italien, par exemple, cela ne fonctionne plus et se termine par une erreur de l'application. Cela est dû, entre autre, aux termes: - "ligne" devenu "riga" - "colonne" devenu "colonna" - "valeur" devenu "valeur"
J'ai donc décider de créer ce tableau dynamiquement en VBA en mettant les termes anglais mais cela ne marche pas sur le "Nombre de Valeur" qui devient "Number of Values". J'obtiens une erreur "Impossible de lire la propriété PivotItems de la classe PivotField".
J'ai essayé aussi avec "Sum of Values", sans plus de succés.
Y a-t-il un moyen de créer dynamiquement un tableau croisé dynamique en s'affranchissant des problèmes de langue de l'excel utilisé ?
With ActiveSheet .PivotTables("PivotTable1").DataPivotField.PivotItems("Number of Values").Position = 1 .PivotTables("PivotTable1").PivotFields("Number of Values").Function = xlSum End With
Je n'ai pas beaucoup d'expérience avec les tableaux croisés, mais
peut-être pourrais-tu remplacer les termes entre guillemets par des Index ?
Michel
Bonjour,
J'ai un classeur excel qui contient un tableau croisé dynamique. Un
bouton permet de faire une mise à jour. On ré-importe des données puis
effectue un traitement qui doit se terminer par la mise à jour du
tableau croisé dynamique.
Le classeur fonctionne parfaitement sur un excel français. Si j'utilise
se classeur sur un excel italien, par exemple, cela ne fonctionne plus
et se termine par une erreur de l'application. Cela est dû, entre autre,
aux termes:
- "ligne" devenu "riga"
- "colonne" devenu "colonna"
- "valeur" devenu "valeur"
J'ai donc décider de créer ce tableau dynamiquement en VBA en mettant
les termes anglais mais cela ne marche pas sur le "Nombre de Valeur" qui
devient "Number of Values". J'obtiens une erreur "Impossible de lire la
propriété PivotItems de la classe PivotField".
J'ai essayé aussi avec "Sum of Values", sans plus de succés.
Y a-t-il un moyen de créer dynamiquement un tableau croisé dynamique en
s'affranchissant des problèmes de langue de l'excel utilisé ?
With ActiveSheet
.PivotTables("PivotTable1").DataPivotField.PivotItems("Number of
Values").Position = 1
.PivotTables("PivotTable1").PivotFields("Number of
Values").Function = xlSum
End With
Je n'ai pas beaucoup d'expérience avec les tableaux croisés, mais peut-être pourrais-tu remplacer les termes entre guillemets par des Index ?
Michel
Bonjour,
J'ai un classeur excel qui contient un tableau croisé dynamique. Un bouton permet de faire une mise à jour. On ré-importe des données puis effectue un traitement qui doit se terminer par la mise à jour du tableau croisé dynamique.
Le classeur fonctionne parfaitement sur un excel français. Si j'utilise se classeur sur un excel italien, par exemple, cela ne fonctionne plus et se termine par une erreur de l'application. Cela est dû, entre autre, aux termes: - "ligne" devenu "riga" - "colonne" devenu "colonna" - "valeur" devenu "valeur"
J'ai donc décider de créer ce tableau dynamiquement en VBA en mettant les termes anglais mais cela ne marche pas sur le "Nombre de Valeur" qui devient "Number of Values". J'obtiens une erreur "Impossible de lire la propriété PivotItems de la classe PivotField".
J'ai essayé aussi avec "Sum of Values", sans plus de succés.
Y a-t-il un moyen de créer dynamiquement un tableau croisé dynamique en s'affranchissant des problèmes de langue de l'excel utilisé ?
With ActiveSheet .PivotTables("PivotTable1").DataPivotField.PivotItems("Number of Values").Position = 1 .PivotTables("PivotTable1").PivotFields("Number of Values").Function = xlSum End With