关于Excel透视表，计算字段在vba中不能设置方向的问题。

schrius820

各位大师，

我研究了好久，实在是搞不定了，上山烧香来了。

我是excel 2010
总共有两个问题。
第一个问题：

N      S2013      T2013
A      2000        4000
B      3000        4000
C      4000        4000

S基本就是销量，T是指标， 我先 生成透视表，然后想在宏里写出计算字段  A2013=S2013/T2013 。
直接写就是     ActiveSheet.PivotTables("数据透视表1").CalculatedFields.Add "A2013", "=S2013 /T2013", True   没啥大问题。

实际运用中，我需要用字母代替，于是问题来了。
a = "A2013"
b = "S2013"
c = "T2013"
ActiveSheet.PivotTables("main").CalculatedFields.Add a, "=" & b & "/" & c, True
最后一句话一直写不对，求帮助。

第二个问题：
我计算字段的A2013已经生成好了，也已经放在了透视表的数值上，想通过vba控制这个字段的方向。
于是问题来了。
    ActiveSheet.PivotTables("数据透视表1").PivotFields("求和项:A2013").Orientation = xlHidden
会报错  不能设置类 pivotfield 的 orientation 属性.

反复尝试，只有计算生成的字段会有这个问题，其他原来存在的字段跑这段程序一切正常，实在太郁闷了。

附件貌似不能上传xlsm，程序只有那两句，求大师，求仙人。

ranger丶亦

遇到同一个问题，但教程讲得不是很明确