前提条件と目標
↓ こんな感じのExcelがあったとする。
例えば
支店名：東京以外でフィルタリングしたい。
商品コード：「N0」を含む行をフィルタリングしたい。 とか
↓ つまりテキストフィルターの この辺を実現したい
指定の値に等しくない
指定の値で始まる
指定の値で終わる
指定の値を含む
指定の値を含まない
最初から用意されている ↓ これを使用した
中身のスクリプトにちょっと手を加えた
一番下の方の
↓ こうなっているのを
↓ このように変更
xlsApp.Selection.AutoFilter col, key
↓
xlsApp.Selection.AutoFilter col, "<>" & key ←こうすると「指定の値に等しくない」
xlsApp.Selection.AutoFilter col, key & "*" ←こうすると「指定の値で始まる」
xlsApp.Selection.AutoFilter col, "*" & key ←こうすると「指定の値で終わる」
xlsApp.Selection.AutoFilter col, "*" & key & "*" ←こうすると「指定の値を含む」
xlsApp.Selection.AutoFilter col, "<>*" & key & "*" ←こうすると「指定の値を含まない」
▶で実行してみる
東京以外がフィルタリングされました！
商品コード：「N0」を含む行がフィルタリングされました！
商品コード：「N0」を含まない行がフィルタリングされました！
以上
