In een draaitabel het veld "∑ waarden" verplaatsen met VBA code

[ikke88]

Hey,

Ik wil een draaitabel maken met behulp van VBA code.
Dat lukt aardig alleen omdat ik twee waardevelden in de tabel zet krijg ik het veld "∑ waarden" erbij en die wordt automatisch in het vak met rijlabels geplaatst (lijst met draaitabelvelden). Ik wil die echter in de kolomlabels hebben staan
Normaal kan je de orientation property instellen op xlrowfield of xlcolumnfield door middel van de code:
ActiveSheet.PivotTables("<naam draaitabel>").PivotFields("<naam kolom data>").Orientation = xlRowField

Ik wou dat ook doen met het "∑ waarden" veld alleen weet ik niet hoe je die aanroept.
Iemand een idee?

 

[ikke88]

omg, te simpel gewoon.

Ik probeerde maar eens om het veld aan te roepen met de naam "gegevens", omdat dat toevallig in de draaitabel stond, en dat bleek dus te werken.
Het engelse "data" kan ook gebruikt worden.

(bedacht onder de douche )