Application.SetAutoFilter 方法 (專案)

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

語法

表情。SetAutoFilter (欄位名稱、 FilterType、 Test1、 Criteria1、 Operation、 Test2、 Criteria2)

詞 一個回傳 應用程式 物件的表達式。

參數

名稱	必要/選用	資料類型	描述
FieldName	必要	字串	欄位的名稱。
FilterType	選用	PjAutoFilterType	篩選; 類型可以是 PjAutoFilterType 常數之一。 預設值是 pjAutoFilterClear ，這會清除自動篩選。
測試1	選用	字串	指定第一個測試的比較的類型。 需要 FilterType 是 pjAutoFilterCustom，且 Criteria1 指定一個值。 可以作為 比較字串之一。
Criteria1	選用	字串	第一次比較的值與由 FieldName 指定的欄位值。
作業	選用	字串	如果有第二次測試時的邏輯運算。 Operation 值可以是 "And" 或 "Or"。
測試2	選用	字串	會指定第二次測試的比較類型。 要求 FilterType 必須是 pjAutoFilterCustom，Operation 值必須設定，且 Criteria2 指定一個值。 該字串可以是 Test1 表格中的比較之一。
Criteria2	選用	字串	第二次比較與 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

如果「% Work Complete」欄位設定了 AutoFilter，以下程式碼行會清除 AutoFilter，因為可選的 FilterType 參數預設值是 pjAutoFilterClear。

Application.SetAutoFilter FieldName:="% Work Complete"

支援和意見反應

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