Filter 関数

Filter(aryStrings, strString [, blnInc, lngCmp])

一次元配列の各要素を指定された文字列によって検索し、フィルタリングされた結果の配列を返します。

引数

aryStrings
検索先の一次元配列の文字列を指定します。
一次配列でない、またはNUL値に場合は実行時エラーが発生します。
strString
検索する文字列を指定します。
blnInc
省略可能です。
要素の抽出モードを True または False で指定します。(省略した場合は True が設定されます)
True を設定した場合は文字列 strString を含む要素のみの配列を、False を設定した場合は文字列 strString を含まない要素のみの配列を返します。
lngCmp
省略可能です。
文字列比較のモードを指定します。(省略した場合はバイナリモードドで比較を行います)
定数 内容
vbBinaryCompare 0 バイナリ モードで比較を行います。
vbTextCompare 1 テキスト モードで比較を行います。

使用例

次のコードは、Filter 関数を使って "山" を含む配列を返す例です。

Dim aryIndex
Dim aryStrings
aryStrings = Array("山田", "佐藤", "中山", "山本", "鈴木")
aryIndex = Filter(aryStrings, "山", True, 1)     '"山田", "中山", "山本" の3要素がセットされます。
aryIndex = Filter(aryStrings, "山", False, 1)    '"佐藤", "鈴木" の2要素がセットされます。
              

関連

Replace 関数

このページの先頭へ