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

Question

这是代码片段给我带来麻烦，我无法找到解决方案，因为它适用于较小的范围，然后遇到运行时错误＆＃39; 13＆＃39;：类型不匹配时我将范围增加到实际尺寸

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行创建缓存时出现问题，我听到传递Range时可能会遇到意外错误。有没有一种简单的方法可以解决这个问题，还是需要将我的范围配置为String？