Metodo NamedRange.Subtotal (System 2007)

Aggiornamento: novembre 2007

Crea subtotali per il controllo NamedRange.

Spazio dei nomi:  Microsoft.Office.Tools.Excel
Assembly:  Microsoft.Office.Tools.Excel.v9.0 (in Microsoft.Office.Tools.Excel.v9.0.dll)

Sintassi

Public Function Subtotal ( _
    GroupBy As Integer, _
    Function As XlConsolidationFunction, _
    TotalList As Object, _
    Replace As Object, _
    PageBreaks As Object, _
    SummaryBelowData As XlSummaryRow _
) As Object

Dim instance As NamedRange
Dim GroupBy As Integer
Dim Function As XlConsolidationFunction
Dim TotalList As Object
Dim Replace As Object
Dim PageBreaks As Object
Dim SummaryBelowData As XlSummaryRow
Dim returnValue As Object

returnValue = instance.Subtotal(GroupBy, _
    Function, TotalList, Replace, PageBreaks, _
    SummaryBelowData)
public Object Subtotal(
    int GroupBy,
    XlConsolidationFunction Function,
    Object TotalList,
    Object Replace,
    Object PageBreaks,
    XlSummaryRow SummaryBelowData
)

Parametri

  • GroupBy
    Tipo: System.Int32

    Campo in base al quale eseguire il raggruppamento, come offset di valore integer in base uno.

  • TotalList
    Tipo: System.Object

    Matrice di offset di campo in base uno, che indica i campi ai quali vengono aggiunti i subtotali.

  • Replace
    Tipo: System.Object

    true per sostituire i subtotali esistenti. Il valore predefinito è false.

  • PageBreaks
    Tipo: System.Object

    true per aggiungere un'interruzione di pagina dopo ciascun gruppo. Il valore predefinito è false.

Valore restituito

Tipo: System.Object

Note

Parametri facoltativi

Per informazioni sui parametri facoltativi, vedere Informazioni sui parametri facoltativi nelle soluzioni Office.

Esempi

Nell'esempio di codice riportato di seguito vengono creati i subtotali per un controllo NamedRange. I subtotali corrispondono alla somma di tutti e tre i campi del controllo NamedRange.

Questo esempio è valido per una personalizzazione a livello di documento.

Private Sub CreateSubtotal()
    Me.Range("A1").Value2 = "Row 1"
    Me.Range("B1").Value2 = "Row 2"
    Me.Range("C1").Value2 = "Row 3"

    Me.Range("A2", "A5").Value2 = 10
    Me.Range("B2", "B5").Value2 = 20
    Me.Range("C2", "C5").Value2 = 30

    Dim namedRange1 As Microsoft.Office.Tools.Excel.NamedRange _
        = Me.Controls.AddNamedRange(Me.Range("A1", "C5"), _
        "namedRange1")

    Dim fields() As Integer = {1, 2, 3}
    namedRange1.Subtotal(1, Excel.XlConsolidationFunction.xlSum, _
        fields, , , Excel.XlSummaryRow.xlSummaryBelow)
End Sub

private void CreateSubtotal()
{
    this.Range["A1", missing].Value2 = "Row 1";
    this.Range["B1", missing].Value2 = "Row 2";
    this.Range["C1", missing].Value2 = "Row 3";

    this.Range["A2", "A5"].Value2 = 10;
    this.Range["B2", "B5"].Value2 = 20;
    this.Range["C2", "C5"].Value2 = 30;

    Microsoft.Office.Tools.Excel.NamedRange namedRange1 =
        this.Controls.AddNamedRange(this.Range["A1", "C5"],
        "namedRange1");

    int[] fields = new int[] { 1, 2, 3 };
    namedRange1.Subtotal(1, Excel.XlConsolidationFunction.xlSum,
        fields, missing, missing, Excel.XlSummaryRow.xlSummaryBelow);
}

Autorizzazioni

Vedere anche

Riferimenti

NamedRange Classe

Membri NamedRange

Spazio dei nomi Microsoft.Office.Tools.Excel