Application.SetAutoFilter メソッド (Project)

シート ビューで指定されたフィールドに対するオートフィルターの条件を設定します。

構文

SetAutoFilter (FieldName, FilterType, Test1, Criteria1, Operation, Test2, Criteria2)

Application オブジェクトを返す式。

パラメーター

名前 必須 / オプション データ型 説明
FieldName 必須 String フィールドの名前を指定します。
FilterType 省略可能 PjAutoFilterType フィルターの種類。 PjAutoFilterType 定数のいずれかを指定できます。 既定値は pjAutoFilterClear で、オートフィルターがクリアされます。
Test1 省略可能 String 最初のテストの比較の種類を指定します。 FilterTypepjAutoFilterCustom であり、Criteria1 が値を指定する必要があります。 比較文字列のいずれかを指定できます。
Criteria1 省略可能 String 最初の比較と FieldName によって指定されたフィールドの値の値。
操作 省略可能 String 2 番目のテストがある場合に論理演算を指定します。 Operation に指定できる値は、"かつ" または "または" です。
テスト 2 省略可能 String 2 番目のテストの比較の種類を指定します。 FilterTypepjAutoFilterCustom であること、Operation の値が設定されていること、および Criteria2 が値を指定する必要があります。 文字列は、 Test1 のテーブルの比較のいずれかにすることができます。
Criteria2 省略可能 String 2 つ目の比較と FieldName で指定されたフィールドの値の値。

比較文字列

比較文字列 説明
"と等しい" 引数 FieldName の値は、引数 Criteria1 の値と等しい。
"と等しくない" 引数 FieldName の値は、引数 Criteria1 の値と等しくない。
"より大きい" 引数 FieldName の値は、引数 Criteria1 の値より大きい。
"以上" 引数 FieldName の値は、引数 Criteria1 の値より大きいか等しい。
"より小さい" 引数 FieldName の値は、引数 Criteria1 の値より小さい。
"以下" 引数 FieldName の値は、引数 Criteria1 の値より小さいか等しい。
"の範囲内" 引数 FieldName の値は、引数 Criteria1 の値の範囲内にある。
"の範囲外" 引数 FieldName の値は、引数 Criteria1 の値の範囲内にない。

戻り値

ブール型 (Boolean)

注釈

オートフィルター機能をオンまたはオフにする方法については、 AutoFilter メソッドを参照してください。

注:

シート ビューの列名には、表示されるフィールドの名前とは別のタイトルを付けることができます。

次の使用例は、"作業時間の達成率" フィールドにユーザー定義のオートフィルターを設定します。

Sub TestAutoFilter() 
    If Not ActiveProject.AutoFilter Then 
        Application.AutoFilter 
    End If 
 
    Application.SetAutoFilter FieldName:="% Work Complete", FilterType:=pjAutoFilterCustom, _ 
    Test1:="equals", Criteria1:="0%" 
End Sub

"作業時間の達成率" フィールドにオートフィルターが設定されている場合、オプションの FilterType 引数の既定値が pjAutoFilterClear であるため、次のコード行はオートフィルターをクリアします。

Application.SetAutoFilter FieldName:="% Work Complete"

サポートとフィードバック

Office VBA またはこの説明書に関するご質問やフィードバックがありますか? サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。