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

  関連記事

ShrinkToFit プロパティ 例
文字列を縮小して全体を表示(ShrinkToFit プロパティ)

ShrinkToFit プロパティ ShrinkToFit プロパティは、セルに …

オートフィルタ(色で抽出する)AutoFilter メソッド

オートフィルタ(色で抽出する) フォントの色、セルの背景色(条件付き書式による設 …

ハイパーリンク(Hyperlink オブジェクト)

Hyperlink オブジェクト Hyperlinks コレクション のメンバー …

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

Precedents プロパティ Precedents プロパティは、対象のセル …

オートフィルタの状況を確認(AutoFilterMode, FilterMode)

AutoFilterMode プロパティ AutoFilterMode プロパテ …

列名・列番号取得 使用例
列名を取得、列番号を取得(Address プロパティ,Column プロパティ)

列番号を取得する セル番地(「A1」や「B3」)や列名(「A」「B」「C」&#8 …

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

Dependents プロパティ Dependents プロパティは、対象のセル …

AutoFilter オブジェクト(メソッド・プロパティ)

AutoFilter.ShowAllData メソッド AutoFilter.S …

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

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

外枠罫線の設定(BorderAround メソッド)

外枠罫線の設定 罫線の設定には、Borders プロパティを使用しますが、範囲内 …