Worksheet.ConsolidationSources, propriété (System 2007)
Mise à jour : novembre 2007
Obtient un Array des chaînes qui nomment les feuilles et plages sources pour la consolidation actuelle de la feuille de calcul.
Espace de noms : Microsoft.Office.Tools.Excel
Assembly : Microsoft.Office.Tools.Excel.v9.0 (dans Microsoft.Office.Tools.Excel.v9.0.dll)
Syntaxe
<BrowsableAttribute(False)> _
Public ReadOnly Property ConsolidationSources As Object
Dim instance As Worksheet
Dim value As Object
value = instance.ConsolidationSources
[BrowsableAttribute(false)]
public Object ConsolidationSources { get; }
Valeur de propriété
Type : System.Object
Array des valeurs de chaîne qui nomment les feuilles et plages source pour la consolidation actuelle de la feuille de calcul ; nullune référence null (Nothing en Visual Basic) s'il n'y a aucune consolidation sur la feuille.
Exemples
L'exemple de code suivant crée une consolidation sur la feuille de calcul active, puis utilise la propriété ConsolidationSources pour afficher les sources de la consolidation.
Cet exemple illustre une personnalisation au niveau du document.
Private Sub ShowConsolidationSources()
' Popluate the data to be consolidated.
Me.Range("A1").Value2 = 22
Me.Range("A2").Value2 = 33
Dim sourceStrings() As String = {"Sheet1!R1C1", _
"Sheet1!R2C1"}
' Consoldate the data by adding it together.
Me.Range("A3").Consolidate( _
sourceStrings, Excel.XlConsolidationFunction.xlSum, _
False, False, False)
' Display the sources of the consolidated data.
If Not (Me.ConsolidationSources Is Nothing) Then
Me.Range("C1").Value2 = _
"Consolidation Sources"
Dim sources As Array = CType(Me.ConsolidationSources, Array)
If sources.Length <> 0 Then
Dim i As Integer
For i = 1 To sources.Length
Me.Range("C" & (i + 1).ToString()).Value2 = sources(i)
Next i
Else
Me.Range("C2").Value2 = "None"
End If
Else
MsgBox("This worksheet has no consolidation.")
End If
End Sub
private void ShowConsolidationSources()
{
// Popluate the data to be consolidated.
this.Range["A1", missing].Value2 = 22;
this.Range["A2", missing].Value2 = 33;
string[] sourceStrings = new string[] { "Sheet1!R1C1",
"Sheet1!R2C1" };
// Consoldate the data by adding it together.
this.Range["A3", missing].Consolidate(sourceStrings,
Excel.XlConsolidationFunction.xlSum, false, false, false);
// Display the sources of the consolidated data.
if (this.ConsolidationSources != null)
{
this.Range["C1", missing].Value2 = "Consolidation Sources";
Array sources = (Array)this.ConsolidationSources;
if (sources.Length != 0)
{
for (int i = 1; i <= sources.Length; i++)
{
this.Range["C" + (i + 1).ToString(),
missing].Value2 = sources.GetValue(i);
}
}
else
{
this.Range["C2", missing].Value2 = "None";
}
}
else
{
MessageBox.Show("This worksheet has no consolidation.");
}
}
Autorisations
- Confiance totale accordée à l'appelant immédiat. Ce membre ne peut pas être utilisé par du code d'un niveau de confiance partiel. Pour plus d'informations, consultez Utilisation de bibliothèques à partir de code d'un niveau de confiance partiel.