Subtotal メソッド (Excel)Range.Subtotal method (Excel)

セル範囲の集計を作成します。指定されたセル範囲が単一セルのときは、アクティブ セル領域を集計します。Creates subtotals for the range (or the current region, if the range is a single cell).

構文Syntax

小計(GroupByFunctiontotallistReplacePageBreaks、概要 (概要)データ)expression.Subtotal (GroupBy, Function, TotalList, Replace, PageBreaks, SummaryBelowData)

expressionRange オブジェクトを表す変数です。expression A variable that represents a Range object.

パラメーターParameters

名前Name 必須 / オプションRequired/Optional データ型Data type 説明Description
GroupByGroupBy 必須Required LongLong グループ化の基準となるフィールドの番号を、1 から始まる整数で指定します。The field to group by, as a one-based integer offset. 詳細については、「使用例」を参照してください。For more information, see the example.
FunctionFunction 必須Required XlConsolidationFunctionXlConsolidationFunction Subtotal 関数。The subtotal function.
TotalListTotalList 必須Required バリアント型Variant 集計を追加するフィールド表す、1 から始まるオフセット番号の配列で指定します。An array of 1-based field offsets, indicating the fields to which the subtotals are added. 使用例を参照してください。For more information, see the example.
ReplaceReplace 省略可能Optional バリアント型 (Variant)Variant 既存の集計表と置き換えるには、 True を指定します。True to replace existing subtotals. 既定値は True です。The default value is True.
PageBreaksPageBreaks 省略可能Optional バリアント型 (Variant)Variant グループごとに改ページが挿入されるようにするには、 True を指定します。True to add page breaks after each group. 既定値は False です。The default value is False.
概要 (概要) データSummaryBelowData 省略可能Optional XlSummaryRowXlSummaryRow 集計データを集計に対して配置します。Places the summary data relative to the subtotal.

戻り値Return value

バリアント型Variant

Example

次の使用例は、シート 1 の選択範囲の集計を作成します。This example creates subtotals for the selection on Sheet1. フィールド 1 をグループの基準とし、フィールド 2 とフィールド 3 の合計が計算されます。The subtotals are sums grouped by each change in field one, with the subtotals added to fields two and three.

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

サポートとフィードバックSupport and feedback

Office VBA またはこの説明書に関するご質問やフィードバックがありますか?Have questions or feedback about Office VBA or this documentation? サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.