shuさん

ご回答いただきありがとうございます。
サンプルの内容については、
ご教示いただいた
Where Fucntion ()
End Function()
で対応出来ました。

>項目5の条件についてはさらに
>
>If Ret Then
>    Ret = False
>    For i =0 to 9
>        if 条件(idx) Then
>            Ret = True
>            Exit For
>        End If
>    Next
>End If
>のようにループにしたりすることも出来ますし
>関数内の処理になるので色々な条件判断にも
>対応できるかと思います。 

項目５は実際、ループの件数が可変ですので、
件数-1のFor～Nextか、ForEach～Nextで対応してみます。

実際、フィルタ条件は２０項目近くあり、
その何項目かは、別のマスタから一旦データテーブルに落とし込んで、そのデータテーブルと
JOINして、絞り込む
というような処理になりそうですので、かなりややこしいです。。。

ただ
Where Fucntion ()
End Function()
は、かなり応用が利きそうに思いますので、上手く条件を整理すれば
コードは書けそうな気がしますので、この件は解決済とさせていただきます。

色々とご教示ありがとうございました。