runtime error - Excel 2010 VBA: Invalid procedure call when adding data field to pivot table -


i want create multiple pivot tables encapsulating complexity functions , procedures (i did manage create pivots vba, 1 module each pivot, meaning lots of repetitive code...)

i managed create procedures , functions create pivot, add filter, , row field. when comes adding data field, invalid procedure call; strange thing error when use variables pass info: looking @ line prodicung error, first line works fine, whereas cannot second line running (the variables contain correct values):

 pivotname.adddatafield pivotname.pivotfields("sdid"), "sd id number", xlcount 'works fine  pivotname.adddatafield pivotname.pivotfields(fieldname), fielddescription, calcmethod 'produces invalid procedure call error 

as running out of ideas, highly appreciated!

thank much,

alexander

the reason error due calcmethod being declared earlier in code string.

the .adddatafield method accepts following parameters:

.adddatafield(field, caption, function) 

the parameter function of xlconsolidationfunction enum , therefore should declared , assigned below:

dim calcmethod xlconsolidationfunction  calcmethod = xlcount 

once declared , assigned above, can use within method in following way fieldname , fielddescription both strings:

pivotname.adddatafield pivotname.pivotfields(fieldname), fielddescription, calcmethod 

Comments

Popular posts from this blog

java - Oracle EBS .ClassNotFoundException: oracle.apps.fnd.formsClient.FormsLauncher.class ERROR -

c# - how to use buttonedit in devexpress gridcontrol -

nvd3.js - angularjs-nvd3-directives setting color in legend as well as in chart elements -