Data source | Return value | |
Microsoft Excel list or database | The cell reference, as text. | |
External data source | An array. Each row consists of an SQL connection string with the remaining elements as the query string, broken down into 200-character segments. | |
Multiple consolidation ranges | A two-dimensional array. Each row consists of a reference and its associated page field items. | |
Another PivotTable | One of the above three kinds of information. |
Set newSheet = ActiveWorkbook.Worksheets.Add
sdArray = Worksheets("Sheet1").UsedRange.PivotTable.SourceData
For i = LBound(sdArray) To UBound(sdArray)
newSheet.Cells(i, 1) = sdArray(i)
Next i