为何创建透视表不成功？

ivrdachen · 发表于 2018-10-15 11:24

本帖最后由 ivrdachen 于 2018-10-15 16:41 编辑

Sub test()
Sheets.Add
ActiveWorkbook.PivotCaches.Create(SourceType:=xlDatabase, SourceData:= _
      Sheets("汇总").UsedRange, Version:=xlPivotTableVersion15).CreatePivotTable _
      TableDestination:=ActiveSheet.Range("a4"), TableName:="数据透视表112", DefaultVersion:= _
      xlPivotTableVersion15
End Sub

弹出提示  作用于对象 pivot catches 失败

找到问题所在了，是数据源有问题，但不知道如何表示，改成Sheets("汇总").range("a1:as1000")可以工作，但是1000这个数字我再改大就出错，但实际行数肯定超过1000的

ivrdachen · 发表于 2018-10-15 16:42

有人知道吗

liulang0808 · 发表于 2018-10-15 21:04

ivrdachen 发表于 2018-10-15 16:42
有人知道吗

透视表没有用过，不了解
不过楼主可以将需求结合附件一同说明，看看是否可以通过其他办法解决的

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

[求助] 为何创建透视表不成功？