vba的数据透视表问题

初学vba请教个学习中遇到的问题。vba的PivotCaches的create的第二个参数是SourceData，但是为什么我用range变量时就报错，用range时就能正常运行。下面是截图，一张用的是由union赋值得到的变量qy；另一张用的range。

理论上是可以的，你写法可能不太对吧，试试这样：

ThisWorkbook.PivotCaches.Create(SourceType:=xlDatabase, SourceData:=ActiveSheet.qy).CreatePivotTable TableDestination:=ActiveSheet.Range("D1"), TableName:="数据透视表"

看看能不能好了。