ConsolidationSources Property
Applies To
Worksheet object.
Description
Returns an array of string values that name the source sheets for the worksheet's current consolidation. Returns Empty if there's no consolidation on the sheet. Read-only Variant.
See Also
Consolidate method, ConsolidationFunction property, ConsolidationOptions property.
Example
This example displays the names of the source ranges for the consolidation on Sheet1. The list appears on a new worksheet created by the example.
Set newSheet = Worksheets.Add
newSheet.Range("A1").Value = "Consolidation Sources"
aSources = Worksheets("Sheet1").ConsolidationSources
If IsEmpty(aSources) Then
newSheet.Range("A2").Value = "none"
Else
For i = 1 To UBound(aSources)
newSheet.Cells(i + 1, 1).Value = aSources(i)
Next i
End If
newSheet.Columns("A:B").AutoFit