ExcelWork.info

Excel(エクセル)のマクロ・VBA・関数・操作などのメモ

オートフィルタ(抽出件数の取得・結果集計)AutoFilter メソッド

   

ワークシート関数の Subtotal 関数 の使い方

VBA には、オートフィルタの抽出件数を取得するプロパティやメソッドがないため、ワークシート関数の SABTOTAL 関数WorksheetFunction プロパティ から呼び出して使用します。さらに、SABTOTAL 関数 を使用して、抽出結果を対象にさまざまな集計を行うことが可能です。


【書式】

object.WorksheetFunction.Subtotal ( arg1, arg2 )


引数・戻り値

  • object  ・・・  対象となる Application オブジェクトを指定します。
  • arg1  ・・・  集計方法を整数値で指定します。(省略不可)
    対応する関数 内容
    1 AVERAGE 平均
    2 COUNT 数値を含むセル数
    3 COUNTA 空白でないセル数
    4 MAX 最大値
    5 MIN 最小値
    6 PRODUCT
    7 STDEV 標本標準偏差
    8 STDEVP 標準偏差
    9 SUM 合計
    10 VAR 不偏分散
    11 VARP 標本分散

  • arg2  ・・・  集計対象のセル範囲(Range オブジェクト)を指定します。(省略不可)

AutoFilter メソッド については、オートフィルタ(AutoFilter メソッド) 等を参照してください。



オートフィルタの結果を集計する使用例

サンプルVBAソース 1


実行結果

サンプルVBAソース 実行前

AutoFilter メソッド 使用例12_1

実行後

AutoFilter メソッド 使用例12_2



サンプルVBAソース 2


実行結果

サンプルVBAソース 実行前

AutoFilter メソッド 使用例12_3

実行後

AutoFilter メソッド 使用例12_4


 - セルの操作 , , , , ,

Message

メールアドレスが公開されることはありません。 * が付いている欄は必須項目です

このサイトはスパムを低減するために Akismet を使っています。コメントデータの処理方法の詳細はこちらをご覧ください

  関連記事

セルを参照する(Range プロパティ)

Range プロパティ 任意のセルにアクセスするには Range プロパティを使 …

対象のセルを直接参照しているセル全てを取得(DirectDependents プロパティ)

DirectDependents プロパティ DirectDependents …

オートフィルタ(抽出条件で使用できる演算子・記号)AutoFilter メソッド

AutoFilter メソッド 【書式】 object.AutoFilter ( …

セルの位置を取得(Left プロパティ、Top プロパティ)

Left プロパティ・Top プロパティ Left プロパティは、「A列」の左端 …

セル・セル範囲を貼り付ける(Paste メソッド)

Paste メソッド Paste メソッドは、クリップボードの内容を指定したセル …

Stop
入力規則(リストで制限する)Validation.Add メソッド

ドロップダウンリストで入力値を制限 Validation.Add メソッド(また …

セルに値を設定する・セルの値を参照する(Value プロパティ)

Value プロパティ Value プロパティは、セルの値を取得したり、値を設定 …

対象のセルが配列数式の一部かどうか(HasArray プロパティ)

HasArray プロパティ HasArray プロパティは、対象のセルが配列数 …

引数に指定したセル範囲の共通のセル範囲を取得(Intersect メソッド)

Intersect メソッド Intersect メソッドは、引数に指定したセル …

オートフィルタ(日付フィルタ)AutoFilter メソッド

日付フィルタを使用してレコードを抽出する Excel 2007 から「日付フィル …