[Excal VBA] オートフィルターを使ってリストにフィルターをかけます。 – Range.AutoFilter メソッド-

動作確認環境

Windows7
Excel: 2007, 2013

説明

オートフィルターを使ってリストにフィルターをかけます。

構文

式.AutoFilter(Field, Criteria1, Operator, Criteria2, VisibleDropDown)

Field: 省略可能 バリアント型 (Variant)
フィルターの対象となるテーブルを指定します。
左側にある項目が”1″。

Criteria1: 省略可能 バリアント型 (Variant)
抽出条件となる文字列を指定します。
“=” と指定すると、空白セルが抽出。
“<>” と指定すると空白以外のフィールドが抽出。
省略すると、抽出条件は All。
引数 Operator に xlTop10Items が指定されている場合は、引数 Criteria1 に項目数を指定。

Operator: 省略可能 XlAutoFilterOperator
フィルターの種類を XlAutoFilterOperator クラスの定数のいずれかで指定します。

[XlAutoFilterOperator]
xlAnd, 抽出条件 1 と抽出条件 2 の論理演算子 AND
xlBottom10Items, 表示される最低値項目 (抽出条件 1 で指定される項目数)
xlBottom10Percent, 表示される最低値項目 (抽出条件 1 で指定される割合)
xlFilterCellColor, セルの色
xlFilterDynamic, 動的フィルター
xlFilterFontColor, フォントの色
xlFilterIcon, フィルター アイコン
xlFilterValues, フィルターの値
xlOr, 抽出条件 1 または抽出条件 2 の論理演算子 OR
xlTop10Items, 表示される最高値項目 (抽出条件 1 で指定される項目数)
xlTop10Percent, 表示される最高値項目 (抽出条件 1 で指定される割合)

Criteria2: 省略可能 バリアント型 (Variant)
2 番目の抽出条件となる文字列を指定します。

VisibleDropDown: 省略可能 バリアント型 (Variant)
True; ドロップダウン矢印を表示します。
False; ドロップダウン矢印を非表示にします。

サンプルコード1

例1 赤ペンでソート

例2 “赤”で始まるセルをソート “*”(アスタリスク)を使用

例3 同じ列で複数条件でフィルタ ここでは”赤ペン”または”黒ペン”と一致するセル

例4 複数のセルで、各々の条件でソート