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 を使っています。コメントデータの処理方法の詳細はこちらをご覧ください

  関連記事

2つ以上のセル範囲を1つにまとめて参照(Union メソッド)

Union メソッド Union メソッドは、2つ以上のセル範囲を1つにまとめて …

文字列の一部の書式を変更(Characters プロパティ)

文字列の一部を参照(Characters プロパティ) Characters プ …

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

DirectDependents プロパティ DirectDependents …

フリガナ(Phonetic プロパティ)

Phonetic プロパティ 文字列(漢字など)をキーボードから入力した時の「読 …

VBA で、ワークシート関数を使用(WorksheetFunction プロパティ)

VBA で、ワークシと関数を使用 VBA から、ワークシート関数を呼び出す場合、 …

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

Value2 プロパティ Value プロパティとの違いは、Value2 プロパ …

オートフィルタ(アイコンで抽出する)AutoFilter メソッド

オートフィルタ(アイコンで抽出する) Excel 2007 から、条件付き書式で …

RemoveDuplicates メソッド 使用例1a
重複するデータを削除(RemoveDuplicates メソッド)

RemoveDuplicates メソッド 指定したセル範囲から重複データを含む …

VerticalAlignment プロパティ 例01
文字列の縦位置を取得・設定する(VerticalAlignment プロパティ)

VerticalAlignment プロパティ VerticalAlignmen …

指定した条件に一致するセルを取得(SpecialCells メソッド)

SpecialCells メソッド SpecialCells メソッドは、指定し …