WorksheetFunction.Subtotal(3, セル範囲)

 フィルターで絞り込んだ結果が何件あるかを返すプロパティは、VBAにありません。絞り込んだ結果の数を調べるには、ワークシート関数のSUBTOTAL関数を使います。

 SUBTOTAL関数は、指定したセル範囲のうち、非表示になっているセルを除外して集計する関数です。1つ目の引数に指定する番号に応じて、件数を調べたり、合計を求めたり、平均を求めたりできます。指定する番号は表の通りです。

 なお、VBAからワークシート関数を呼び出すには、WorksheetFunctionを用います。

●SUBTOTAL関数で集計する内容を指定するための番号(主なもの)
●SUBTOTAL関数で集計する内容を指定するための番号(主なもの)
[画像のクリックで拡大表示]
[画像のクリックで拡大表示]