Excel VBA教程:ConsolidationSources属性

返回一个字符串数组,这些字符串是工作表中当前合并计算的数据源的名称。如果工作表中没有合并计算,将返回 Empty。Variant 类型,只读。

Excel VBA教程:ConsolidationSources属性·示例

本示例显示在工作表 Sheet1 中用于合并计算的数据源的名称。名称列表将出现在本示例新建的工作表中。


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

上页:Excel VBA教程:ConsolidationOptions属性 下页:Excel VBA教程:ConstrainNumeric属性

Excel VBA教程:ConsolidationSources属性

Excel VBA教程:ConstrainNumeric属性 Excel VBA教程:Container属性
Excel VBA教程:Contrast属性 Excel VBA教程:ControlCharacters属性
Excel VBA教程:ControlFormat属性 Excel VBA教程:CopyObjectsWithCells属性
Excel VBA教程:Corners属性 Excel VBA教程:CorrectCapsLock属性
Excel VBA教程:CorrectSentenceCap属性 Excel VBA教程:Count属性
Excel VBA教程:CreateBackup属性 Excel VBA教程:Creator属性
Excel VBA教程:Criteria1属性 Excel VBA教程:Criteria2属性
Excel VBA教程:CropBottom属性 Excel VBA教程:CropLeft属性
Excel VBA教程:CropRight属性 Excel VBA教程:CropTop属性
Excel VBA教程:Crosses属性 Excel VBA教程:CrossesAt属性
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号