NamedRange.Subtotal Метод (2007 System)

Статья
11/16/2008

Обновлен: Ноябрь 2007

Создает промежуточные итоги для элемента управления NamedRange.

Пространство имен: Microsoft.Office.Tools.Excel
Сборка: Microsoft.Office.Tools.Excel.v9.0 (в Microsoft.Office.Tools.Excel.v9.0.dll)

Синтаксис

'Декларация
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
)

Параметры

GroupBy
Тип: System.Int32
Поле, по которому производится группирование, как целочисленное смещение от единицы.

Function
Тип: Microsoft.Office.Interop.Excel.XlConsolidationFunction
Функция промежуточного итога.
Может быть одно из следующих значений XlConsolidationFunction:
- xlAverage
- xlCount
- xlCountNums
- xlMax
- xlMin
- xlProduct
- xlStDev
- xlStDevP
- xlSum
- xlUnknown
- xlVar
- xlVarP

TotalList
Тип: System.Object
Массив смещения полей, отсчитываемого от единицы, указывающий поля, к которым добавляются промежуточные итоги.

Replace
Тип: System.Object
Значение true для замены существующих промежуточных итогов. Значение по умолчанию — false.

PageBreaks
Тип: System.Object
Значение true для добавления разрыва страницы после каждой группы. Значение по умолчанию — false.

SummaryBelowData
Тип: Microsoft.Office.Interop.Excel.XlSummaryRow
Помещает сводные данные относительно промежуточного итога.
Может быть одно из следующих значений XlSummaryRow:
- xlSummaryAbove
- xlSummaryBelow (по умолчанию)

Возвращаемое значение

Тип: System.Object

Заметки

Необязательные параметры

Сведения о необязательных параметрах см. в разделе Общие сведения о необязательных параметрах в решениях Office.

Примеры

В следующем примере кода создаются промежуточные итоги для NamedRange. Промежуточные итоги — это сумма всех трех полей в NamedRange.

В этом примере демонстрируется настройка уровня документа.

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);
}

Разрешения

Полное доверие для непосредственно вызывающего метода. Этот член не может быть использован частично доверенным кодом. Дополнительные сведения см. в разделе Использование библиотек из не вполне надежного кода.