Метод Range.Subtotal (Excel)

Статья
04/07/2023

Создает промежуточные итоги для диапазона (или текущего региона, если диапазон является одной ячейкой).

Синтаксис

expression. Промежуточный итог (GroupBy, Function, TotalList, Replace, PageBreaks, SummaryBelowData)

выражение: переменная, представляющая объект Range.

Параметры

Имя	Обязательный или необязательный	Тип данных	Описание
GroupBy	Обязательный	Long	Поле для группировки в виде одночисленного смещения. Дополнительные сведения см. в примере.
Function	Обязательный	XlConsolidationFunction	Функция промежуточных итогов.
TotalList	Обязательный	Variant	Массив из 1 смещения полей, указывающих поля, к которым добавляются промежуточные итоги. Дополнительные сведения см. в примере.
Replace	Необязательный	Variant	Значение True для замены существующих промежуточных итогов. Значение по умолчанию — True.
PageBreaks	Необязательный	Variant	Значение true для добавления разрывов страниц после каждой группы. Значение по умолчанию — False.
SummaryBelowData	Необязательный	XlSummaryRow	Размещает сводные данные относительно промежуточных итогов.

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

Variant

Пример

В этом примере создаются промежуточные итоги для выделения на листе Sheet1. Промежуточные итоги — это суммы, сгруппированные по каждому изменению в поле 1, а промежуточные итоги добавляются к полям 2 и 3.

Worksheets("Sheet1").Activate 
Selection.Subtotal GroupBy:=1, Function:=xlSum, _ 
 TotalList:=Array(2, 3)

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.