オートフィルタ（AutoFilter）の使い方まとめ
オートフィルタはエクセルの中でもデータ処理において非常に強力なものです、
特に大量データの処理には書くことのできない機能となっています。
しかし、使い方が難しく、またバージョン違いの影響が大きく、使いずらい物となっていて、問い合わせを受ける事も多いです。
まずは、以下の記事をお読み頂きたい。
マクロの記録でVBA：第19回.オートフィルタ2
マクロVBA入門：第89回.オートフィルタ（AutoFilter）
マクロVBAサンプル集：オートフィルター（AutoFilter）
マクロVBAサンプル集：日付のオートフィルタ（AutoFilter）
それぞれでVBAの記述について解説していますが、
とても覚えきれるものではありませんし、
かなり面倒なシロモノであることは間違いありません。
Criteria
の指定方法です。
Criteria1だけで、かつ数値・文字なら、それほどの問題はないのですが、
複数の値や日付のオートフィルタは、とても面倒なものです。
どういう事かというと、
ある列の絞り込みで、"a"と"b"を絞り込みたいのなら、
作業列を追加して、"a" or "b" のとき1、それ以外は0を入れます。
そして、作業列で絞り込むようにします。
例.
A列で、"a"と"b"で絞り込むなら
とりあえず100行までとして、
B列に、
For i = 2 To 100
If Cells(i, 1) = "a" Or Cells(i, 1) = "a" Then
Cells(i, 2) = 1
Else
Cells(i, 2) = 0
End If
Next
とします。
これでB列でオートフィルタすれば良いわけです。
一行ずつにデータを入れていたら、大量データの時は、それだけで多大な時間がかかってしまいます。
それを解決させるには、配列を使用して、セルへの一括更新のテクニックを使います。
Dim i As Long
Dim ary
ary = Range("A1:B100")
For i = 2 To 100
If ary(i, 1) = "a" Or ary(i, 1) = "a" Then
ary(i, 2) = 1
Else
ary(i, 2) = 0
End If
Next
Range("A1:B100") = ary
このようにセルとのやりとりは一括で処理するようにします。
これでB列でオートフィルタすれば高速処理が実現できます。
サンプルのコードはかなり簡易的に書いていますので適宜変更して下さいね。
オブジェクト操作による、マクロが遅いという問題点を解消します。
複数の機能を上手に組み合わせることが最も重要で、最も難しいことになります。
同じテーマ「マクロVBA技術解説」の記事
ユーザー操作を制限する（Locked,Protect,ScrollArea）
シートに数式を設定する時のセル参照の指定方法
標準モジュールとシートモジュールの違い
オートフィルタ（AutoFilter）の使い方まとめ
複雑な条件（複数除外等）のオートフィルター（AutoFilter）
クリップボードを使わないセルのCopy
Rangeの使い方：最終行まで選択を例に
フルパスをディレクトリ、ファイル名、拡張子に分ける
Colorプロパティの設定値一覧
VBAを定型文で覚えよう
VBAこれだけは覚えておきたい必須基本例文10
新着記事NEW ・・・新着記事一覧を見る
COUNTIF関数の結果は?（ツイッターお題）｜エクセル雑感（5月30日）
エクセル&VBA オンライン講座｜エクセル セミナー（5月29日）
アルファベットの26進（ツイッターお題）｜エクセル雑感（5月19日）
VBAが消えてしまった！マクロが壊れて動かない！｜エクセル雑感（5月8日）
時間に関する関数の扱い方（ツイッター投稿）｜エクセル雑感（5月6日）
文字列のセルだけ結合（ツイッターのお題）｜エクセル雑感（5月5日）
表示形式.言語設定｜エクセル入門（5月1日）
GoogleスプレッドシートをExcelにインポートする｜VBAサンプル集（4月28日）
ツイッターのお題「CSV編集」｜エクセル雑感（4月25日）
プログレスバーを自作する｜ユーザーフォーム入門（4月18日）
アクセスランキング ・・・ ランキング一覧を見る
1.最終行の取得（End,Rows.Count）｜VBA入門
2.RangeとCellsの使い方｜VBA入門
3.変数宣言のDimとデータ型｜VBA入門
4.マクロって何？VBAって何？｜VBA入門
5.Range以外の指定方法（Cells,Rows,Columns）｜VBA入門
6.セルのコピー&値の貼り付け（PasteSpecial）｜VBA入門
7.繰り返し処理（For Next)｜VBA入門
8.セルに文字を入れるとは（Range,Value）｜VBA入門
9.とにかく書いてみよう（Sub,End Sub）｜VBA入門
10.マクロはどこに書くの（VBEの起動）｜VBA入門
- ホーム
- マクロVBA応用編
- マクロVBA技術解説
- オートフィルタ（AutoFilter）の使い方まとめ
このサイトがお役に立ちましたら「シェア」「Bookmark」をお願いいたします。
記述には細心の注意をしたつもりですが、
間違いやご指摘がありましたら、「お問い合わせ」からお知らせいただけると幸いです。
掲載のVBAコードは動作を保証するものではなく、あくまでVBA学習のサンプルとして掲載しています。
掲載のVBAコードは自己責任でご使用ください。万一データ破損等の損害が発生しても責任は負いません。