GetPivotData : comment récupérer une valeur dans un TCD

Bonjour a tous,

Je sèche sur un bout de code qui doit me permettre de récupérer une valeur d'un TCD

J'ai utiliser l'enregistreur de macro mais rien n'y fait. Mon tcd est créer en vba.

les variables utilisées sont les suivantes :

Dim ws1 as worksheet, ws3 as worksheet
Dim Field1 as String
Dim pvtField as String (pour tous les pvtFields)

ws1.Range("i4") = ws3.PivotTables(Field1).GetPivotData(pvtField6, _ 
pvtField4, "Ordre fonctionnement de service", _ 
pvtField5, "Maintenance")           'pour récupérer la valeur du TCD

Je ne sais pas si mon implémentation du GetPivotData est correcte. Enfin si puisque ca ne fonctionne pas.

Quelqu'un pourrait-il m'aider.

Merci d'avance

Bonjour vpfree71

Bonjour BrunoM45,

oui avec un fichier ce serait surement mieux mais je n'arrive pas a descendre en dessous de 1810 ko.

Bonjour vpfree71

Bien que pas conseillé, vous le postez le sur une plateforme et vous nous donnez le lien sans mettre "https://"

A+

Bonjour BrunoM45,

ci-après le lien de téléchargement.

Merci encore.

wetransfer point com /downloads/8f2a1e42e2c6027963f65b0e71e9e4be20220718060112/d7ee693d96cbc0795e904e1ac44bd64320220718060144/5be2f6

Bonjour

Transfert expiré...

Bonjour 78chris,

quelle poisse je l'ai fait ce matin.

Une autre tentative ci-dessous

we point tl /t-qXDIQjjN5h

Merci

Il semblerait que le lien ne fonctionne toujours pas.

Je vais essayer avec gdrive.

https://docs.google.com/spreadsheets/d/1Jj52MFSKG4yBUsSq8evgw63hYUw_2GmU?rtpof=true&authuser=valenti...

Un petit up svp.

Personne pour m'aider ?

Bonjour

Il faut des droits pour accéder au fichier...

Utilise cjoint

Rechercher des sujets similaires à "getpivotdata comment recuperer valeur tcd"