VBA 色で絞り込む方法

  実務では、大量のデータを絞り込むには、オートフィルタがとても便利です。今日は、色で絞り込む方法を見てみましょう。

 

セル背景色で絞り込む

 

 

構文
Range.AutoFilter　Field, Criteria1, Operator

Criteria1にRGB色を指定し、Operatorにフォントか背景かを指定する

 

Sub test()

 

  　 ' テープルのA列が「水色」塗りだけを抽出する
    Range("A1").AutoFilter 1, RGB(0, 255, 255), xlFilterCellColor

 

End Sub

 

実行結果

 

 

セル文字色で絞り込む

 

Sub test2()

 

　　　’テーブルH列が赤フォントだけを抽出する

　　　Range("A1").AutoFilter 8, RGB(255, 0, 0), xlFilterFontColor

End Sub

 

実行結果

 

 

 

関連記事