Project) (Application.SetAutoFilter 方法

會為工作表檢視中指定欄位設定自動篩選的準則。

語法

運算式。SetAutoFilter (FieldName， FilterType， Test1， Criteria1， Operation， Test2， Criteria2)

表達 會傳回 Application 物件的運算式。

參數

名稱	必要/選用	資料類型	描述
FieldName	必要	字串	欄位的名稱。
FilterType	選用	PjAutoFilterType	篩選; 類型可以是 PjAutoFilterType 常數之一。 預設值是 pjAutoFilterClear ，這會清除自動篩選。
Test1	選用	字串	指定第一個測試的比較的類型。 FilterType必須是pjAutoFilterCustom，而且Criteria1指定值。 可以是其中一個 比較字串。
Criteria1	選用	字串	與 FieldName所指定欄位值進行第一次比較的值。
作業	選用	String	如果有第二次測試時的邏輯運算。 Operation 值可以是 "And" 或 "Or"。
Test2	選用	字串	會指定第二次測試的比較類型。 需要 FilterType 為 pjAutoFilterCustom、必須設定 Operation 值，以及 Criteria2 指定值。 字串可以是 Test1資料表中的其中一個比較。
Criteria2	選用	String	與 FieldName所指定欄位值進行第二次比較的值。

比較字串

比較字串	描述
"等於"	FieldName 的值等於 Criteria1。
"不等於"	FieldName 的值不等於 Criteria1。
"大於"	FieldName 的值大於 Criteria1。
"大於或等於"	FieldName 的值大於或等於 Criteria1。
"小於"	FieldName 的值小於 Criteria1。
"小於或等於"	FieldName 的值小於或等於 Criteria1。
"在兩者之間"	FieldName 的值在 Criteria1 之間。
"不在兩者之間"	FieldName 的值不在 Criteria1 之間。

傳回值

布林值

註解

若要開啟或關閉自動篩選功能，請參閱 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

如果 [完成工作百分比] 欄位設定了 [自動篩選]，則下列程式程式碼會清除 AutoFilter，因為選擇性 FilterType 引數的預設值是 pjAutoFilterClear。

Application.SetAutoFilter FieldName:="% Work Complete"

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎？ 如需取得支援服務並提供意見反應的相關指導，請參閱 Office VBA 支援與意見反應。