在透视表的自定义字段中使用自定义函数VBA

当我尝试使用自定义函数(写在VBA),在透视表Excel的自定义字段给我一个错误:“找不到元素”。

function代码:

Function testfunc(keks) testfunc = keks * 2 End Function 

在工作表上这个小function工作正常。

数据透视表不能使用自定义函数,只能使用默认值。