VBA数据透视表向导语法错误

我正在处理一个简单的语法错误,在这行代码…

Set PvtTbl = wsPvtTbl.PivotTableWizard(SourceType:=xlDatabase, SourceData:=rngData, TableDestination:=wsPvtTbl.Range("A1"), TableName:="PivotTable1") 

如果有人能在这里发现问题,我将不胜感激。