数据透视表内如何使用字符串变量？？？

wukuan · 发表于 2007-5-26 14:29

rjt8lHoA.rar (8.18 KB, 下载次数: 18)

Sub 月份()
    With ActiveSheet.PivotTables("数据透视表1").PivotFields("月份")
        .PivotItems("2月").Visible = False
    End With
      Cells(8, 6).Formula = _
        "=GETPIVOTDATA(""数量"",$e$2,""月份"",""1月"",""缺陷"",""大塌边"")"

'这公式里的1月能不能用字符串变量来表示？？比如用单元格里的文本作为字符串变量？

End Sub
请老师帮我看看阿，急着用，谢谢了

northwolves · 发表于 2007-5-26 17:44

Cells(8, 6).Formula = _
"=GETPIVOTDATA(""数量"",$e$2,""月份""," & [a1].address & ",""缺陷"",""大塌边"")"

wukuan · 发表于 2007-5-26 22:11

谢谢版主！！！感激~~~~

wukuan · 发表于 2007-5-26 22:15

Cells(8, 6).Formula = _
"=GETPIVOTDATA(""数量"",$e$2,""月份""," & [CELLS(2,6)].Address & ",""缺陷"",""大塌边"")"

能不能用cells()来作单元格的地址？？？

wukuan · 发表于 2007-5-26 22:31

用cells()作地址比较容易设置变量阿，请版主再帮我看看

nawong · 发表于 2007-6-4 11:22

Cells(8, 6).Formula = _
"=GETPIVOTDATA(""數量"",$e$2,""月份""," & [CELLS(2,6)].Address & ",""缺陷"",""大塌邊"")"

Cells(8, 6).Formula = _
"=GETPIVOTDATA(""數量"",$e$2,""月份""," & CELLS(2,6).Address & ",""缺陷"",""大塌邊"")"

wukuan · 发表于 2007-6-4 11:39

谢谢，这位老师，呵呵

		自动登录	找回密码
密码			免费注册