VBA数据透视表类型不匹配错误跨工作簿

VBA数据透视表类型不匹配错误跨工作簿,vba,excel,Vba,Excel,下面是一段给我带来麻烦的代码,我无法找到解决方案,因为它适用于较小的范围,然后运行时出现错误“13”:当我将范围增加到实际大小时,类型不匹配 Set dataRange = wbData.Sheets("RawData").Range(Cells(1, "A"), Cells(endCell, "AA")) 'create root cause pivot chart wbReviewPivots.Sheets("RootCausesCleaned").Activate Set rcPTCach

下面是一段给我带来麻烦的代码,我无法找到解决方案,因为它适用于较小的范围,然后运行时出现错误“13”:当我将范围增加到实际大小时,类型不匹配

Set dataRange = wbData.Sheets("RawData").Range(Cells(1, "A"), Cells(endCell, "AA"))
'create root cause pivot chart
wbReviewPivots.Sheets("RootCausesCleaned").Activate
Set rcPTCache = ActiveWorkbook.PivotCaches.Create(SourceType:=xlDatabase, SourceData:=dataRange)
Set rcPT = ActiveSheet.PivotTables.Add(PivotCache:=rcPTCache, TableDestination:=Range("A1"))
    With rcPT
        .PivotFields("Root Cause").Orientation = xlRowField
        .PivotFields("Root Cause (Sub Category)").Orientation = xlRowField
        .PivotFields("Remedy Task ID").Orientation = xlDataField
    End With

问题发生在第4行创建缓存时,我听说在通过某个范围时可能会遇到意外错误。有没有一种简单的方法来解决这个问题,或者我需要将我的范围配置为字符串?

这是一个pivot缓存所有内容都在代码中的其他地方定义,只有当我将数据范围设置得更大时才会发生错误。测试结果表明没有任何影响,我已将问题缩减到excel数据工作表中的某一列。该列包含一个非常长的字符串,每个单元格约200个字符。如果我将其从范围中排除,代码运行得非常好。我不需要把它包括在内,但它的两边都有重要的数据。是否有一种方法可以将数据从缓存中排除,而无需将两个段移到其他位置并从中创建缓存。