Bonjour,

Pourrais je avoir de l'aide pour écrire ça correctement ou bien la formule directement en vba pour récupérer des valeurs d'un TCD avec VBA ?

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
  For i = 1 To 9
            g = 0
            g = " & CStr(g) & " + "=GETPIVOTDATA(""compteur"",R3C1,""delai""," & i & ")"
            Range("U7").value = g
   Next i
ou encore

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
For i = 1 To 9
            g = 0
            g = g + .PivotTables("TCD Tarification").GetPivotData("compteur", R3C1, "delai", " & i & ")
            Range("U7").value = g
Next i
Cordialement