Excel VBA数据透视缓存类型不匹配运行时错误'13'

arooney88

感谢您对此的任何投入。我正在尝试制作一个简单的数据透视表,该数据表从工作表“ 5个月趋势5月15日”中获取数据,并将其放在我的数据透视表工作表中,该数据表称为“关键性错误-数据透视”。

当我尝试使用create方法设置数据透视表缓存范围时,它会返回类型不匹配的运行时错误。我已经检查了参数,看来我已经正确设置了。我确实尝试指定了数据透视表的版本,但仍收到相同的错误。我的代码如下。

我假设这与pvtCache变量或将其设置为范围的方式有关,但我无法找出任何解决方案。

Sub PivotTableCode()

Dim pvtCache As PivotCache 
Dim pvt As PivotTable
Dim pf As PivotField
Dim pi As PivotItem 
'Set the cache of the pivot table
Sheets("5 Month Trending May 15").Select
Set pvtCache = ActiveWorkbook.PivotCaches.Create(xlDatabase, Range("A2:H38"))

'create the Pivot Table
Sheets("Errors by Criticality - Pivot").Select
Set pvt = ActiveSheet.PivotTables.Add(pvtCache, Range("AP2"), "MyPivotTable") 
End Sub
拜伦·沃尔

PivotCaches.Create文档指示

SourceData如果参数是必须的SourceType不是xlExternal它可以是一个Range对象(当SourceType为任一xlConsolidationxlDatabase)或Excel工作簿连接对象(当SourceTypexlExternal)。

尽管如此,宏记录器将始终为String此处创建一个SourceData(如果Sheet名称中有空格,它甚至会创建一个错误的字符串)。

给定对宏记录器的偏爱,我经常将其String与地址一起提供。

我已经能够在Range这里提供了,所以我不确定Range在这种情况下会发生什么特别的事情来阻止使用。

要使用String,您的代码应如下所示:

Set pvtCache = ActiveWorkbook.PivotCaches.Create(xlDatabase, "'5 Month Trending May 15'!A2:H38")

本文收集自互联网,转载请注明来源。

如有侵权,请联系 [email protected] 删除。

编辑于
0

我来说两句

0 条评论
登录 后参与评论

相关文章

Excel VBA运行时错误类型不匹配13

Excel VBA运行时错误“ 13”:类型不匹配

运行时错误 13' 类型不匹配 VBA excel

VBA Excel中的“运行时错误13:类型不匹配”错误

Application.Wait和Excel VBA运行时错误'13'类型不匹配

Excel运行时错误13中的VBA:类型不匹配

尝试检测是否关闭了用户窗体时在Excel VBA中得到“运行时错误'13':类型不匹配”

Excel VBA运行时错误“ 13”:将变量数组传递给Application.Index方法时,类型不匹配

VB Excel 2010运行时错误'13':类型不匹配

运行时错误'13:比较日期时键入不匹配-EXCEL VBA

运行时错误13 VBA Excel

VBA Excel“错误13:类型不匹配”

我在VBA excel中编写编码器。我不断收到运行时错误13。它说不匹配

运行时错误13 VBA Excel 2007

Excel VBA If语句多条件运行时错误13

运行-时间错误“ 13”:类型不匹配-Excel用户窗体

运行时错误“13”:宏中的类型不匹配

运行时错误'13':类型不匹配,定义了PivotCahe

运行时错误13,类型不匹配MsgBox取消

运行时错误“13”类型不匹配:如果或

类型不匹配运行时错误13

运行时错误13 /类型不匹配

工作表运行时错误“13”:类型不匹配

Access 2010 VBA类型不匹配(错误13)或运行时错误424(必需的对象)

VBA中带有变量的动态范围的“运行时错误13”。数据类型不匹配

运行时错误“13”:显示来自 JSON 数组的数据时出现类型不匹配错误

更新汇率-VBA-运行时错误13类型不匹配

VBA Scripting.dictionary运行时错误'13'类型不匹配

Access数据库运行时错误13类型不匹配