For Each objPivotTable In buildWorksheet.PivotTables
objPivotTable.TableRange2.Clear
Next

Set worksheetpivotCache = ActiveWorkbook.PivotCaches.Add(SourceType:=xlDatabase, SourceData:=dataRange)

Set objPivotTable = worksheetpivotCache.CreatePivotTable(TableDestination:=buildWorksheet.Cells(1, 1), TableName:=”PivotTable1”)