Метод Application.SetAutoFilter (Project)
Задает условия для автофильтра для указанного поля в представлении листа.
Синтаксис
expression. SetAutoFilter (FieldName, FilterType, Test1, Criteria1, Operation, Test2, Criteria2)
Выражение Выражение, возвращающее объект Application .
Параметры
Имя | Обязательный или необязательный | Тип данных | Описание |
---|---|---|---|
FieldName | Обязательный | String | Имя поля. |
FilterType | Необязательный | PjAutoFilterType | Тип фильтра; может быть одной из констант PjAutoFilterType . Значение по умолчанию — pjAutoFilterClear, которое очищает автофильтр. |
Test1 | Необязательный | String | Указывает тип сравнения для первого теста. Требуется, чтобы filterType было pjAutoFilterCustom, а условие1 указывает значение. Может быть одной из строк сравнения. |
Criteria1 | Необязательный | String | Значение первого сравнения со значением поля, заданного параметром FieldName. |
Операция | Необязательный | String | Логическая операция при наличии второго теста. Значение Операции может быть "И" или "Или". |
Test2 | Необязательный | String | Указывает тип сравнения для второго теста. Для параметра FilterType требуется значение pjAutoFilterCustom, должно быть задано значение Operation , а параметр Criteria2 указывает значение. Строка может быть одним из сравнений в таблице для Test1. |
Criteria2 | Необязательный | String | Значение второго сравнения со значением поля, заданного параметром FieldName. |
Строки сравнения
Строка сравнения | Описание |
---|---|
"равно" | Значение FieldName равно Criteria1. |
"не равно" | Значение FieldName не равно Criteria1. |
"больше, чем" | Значение FieldName больше , чем Criteria1. |
"больше или равно" | Значение FieldName больше или равно Условию1. |
"меньше, чем" | Значение FieldName меньше Criteria1. |
значение "меньше или равно" | Значение FieldName меньше или равно Условию1. |
"is within" | Значение FieldName находится в criteria1. |
"не внутри" | Значение FieldName не находится в критерии Criteria1. |
Возвращаемое значение
Boolean
Примечания
Сведения о включении или отключении функции автофильтра см. в разделе Метод AutoFilter .
Примечание.
Имя столбца в представлении листа может отличаться от имени отображаемого поля.
Пример
В следующем примере задается пользовательский автофильтр для поля "% Work Complete".
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, следующая строка кода очищает автофильтр, так как значение по умолчанию для необязательного аргумента FilterType — pjAutoFilterClear.
Application.SetAutoFilter FieldName:="% Work Complete"
Поддержка и обратная связь
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.