Я пытаюсь создать сводную таблицу, но получаю.Invalid Procedure Call or Argument

ActiveWorkbook.PivotCaches.Create(SourceType:=xlDatabase, SourceData:="rng", Version:=xlPivotTableVersion14).CreatePivotTable TableDestination:="rngB", TableName:="pvtReportA_B", DefaultVersion:=xlPivotTableVersion14

rng (Источник) - это диапазон, состоящий из около 20 столбцов и нескольких тысяч строк.rngB (Место назначения) - это отдельная ячейка на другом листе

Кто-нибудь может посоветовать, где я иду не так?

РЕДАКТИРОВАТЬ:

Моя вина, я должен был использоватьrngData и неrng как источник

    Set rng = wsA.Range("C14")
    Set rngData = Range(rng, rng.End(xlToRight))
    Set rngData = Range(rng, rng.End(xlDown))
    Set rngB = wsB.Range("C8")

    ActiveWorkbook.PivotCaches.Create(SourceType:=xlDatabase, SourceData:=rngData, Version:=xlPivotTableVersion14).CreatePivotTable TableDestination:=rngB, TableName:="pvtReportA_B", DefaultVersion:=xlPivotTableVersion14

Это поднимает рамку сводной таблицы просто отлично.