NamedRange.Subtotal 方法

定義

命名空間:

Microsoft.Office.Tools.Excel

組件:

Microsoft.Office.Tools.Excel.dll

建立 NamedRange 控制項的小計。

public object Subtotal (int GroupBy, Microsoft.Office.Interop.Excel.XlConsolidationFunction Function, object TotalList, object Replace, object PageBreaks, Microsoft.Office.Interop.Excel.XlSummaryRow SummaryBelowData = Microsoft.Office.Interop.Excel.XlSummaryRow.xlSummaryBelow);

abstract member Subtotal : int * Microsoft.Office.Interop.Excel.XlConsolidationFunction * obj * obj * obj * Microsoft.Office.Interop.Excel.XlSummaryRow -> obj

Public Function Subtotal (GroupBy As Integer, Function As XlConsolidationFunction, TotalList As Object, Optional Replace As Object, Optional PageBreaks As Object, Optional SummaryBelowData As XlSummaryRow = Microsoft.Office.Interop.Excel.XlSummaryRow.xlSummaryBelow) As Object

參數

GroupBy

Int32

以一維整數位移的形式，建立欄位群組。

Function

XlConsolidationFunction

小計函式。可以是下列 XlConsolidationFunction 其中一個值： xlAveragexlCountxlCountNumsxlMaxxlMinxlProductxlStDevxlStDevPxlSumxlUnknownxlVarxlVarP

TotalList

Object

以 1 開始的欄位位移陣列，指出要加入小計的欄位。

Replace

Object

true 表示取代現有的小計。 預設值是 false。

PageBreaks

Object

true 表示在每個群組後加入分頁符號。 預設值是 false。

SummaryBelowData

XlSummaryRow

Places 與小計相對的摘要數據。可以是下列XlSummaryRow其中一個值： xlSummaryAbovexlSummaryBelow (預設)

傳回

Object

範例

下列程式代碼範例會為 NamedRange建立小計。 小計是 中 NamedRange所有三個字段的總和。

此範例適用於檔層級自定義。

private void CreateSubtotal()
{
    this.Range["A1"].Value2 = "Row 1";
    this.Range["B1"].Value2 = "Row 2";
    this.Range["C1"].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, Excel.XlSummaryRow.xlSummaryBelow);
}

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

備註

選擇性參數

如需選擇性參數的資訊，請參閱 Office 方案中的選擇性參數。