Re : erreur syntaxe dans la definition des pivot fiels d'un tcd
hello
c'est correct, j'avais débuggé de la même manière !
categoryname = CStr(Sheets("TCDinput").Cells(1, c).Value)
mon pb est que je ne fais pas du vba ni sur acces, ni sur excel, ni sur rien du tout, d'où mais nbreuses requêtes en terme de syntaxe sur ce super forum !
d'ailleurs voici mon dernier pb ! ****
Maintenant que les pivot fiels sont ok, c 'est les datafields qui buggent
For crit = 1 To nbercriteria
Sheets("TCDinput").Select
criterianame = CStr(Sheets("TCDInput").Cells(1, nbercategories + crit).Value)
ActiveChart.PivotLayout.PivotTable.AddDataField ActiveChart.PivotLayout. _
PivotTable.PivotFields(criterianame)
*****criterianame est bien à la bonne valeur par contre le adddatafield plante..
C'est la dernière brique manquante à mon édifice et après la structure de mon appli est finie, resterea à faire le dépoussierrage, controle des entrées, formalismen, etc....
Tout un programme!
En tout cas merci pour ton aide
@+