Compartir a través de


Método Application.SetAutoFilter (Project)

Establece los criterios para un Autofiltro para un campo especificado en una vista de hoja.

Sintaxis

expresión. SetAutoFilter (FieldName, FilterType, Test1, Criteria1, Operation, Test2, Criteria2)

Expresión Expresión que devuelve un objeto Application .

Parameters

Nombre Obligatorio/opcional Tipo de datos Descripción
FieldName Obligatorio String Nombre del campo.
FilterType Opcional PjAutoFilterType Tipo de filtro; puede ser una de las constantes PjAutoFilterType. El valor predeterminado es pjAutoFilterClear, que se borra el filtro automático.
Prueba 1 Opcional String Especifica el tipo de comparación de la primera prueba. Requiere que FilterType sea pjAutoFilterCustom y que Criteria1 especifique un valor. Puede ser una de las cadenas de comparación.
Criteria1 Optional Cadena Valor de la primera comparación con el valor del campo especificado por FieldName.
Operación Opcional Cadena Operación lógica si hay una segunda prueba. El valor de Operation puede ser "And" u "Or".
Prueba 2 Opcional Cadena Especifica el tipo de comparación para la segunda prueba. Requiere que FilterType sea pjAutoFilterCustom, se debe establecer el valor Operation y que Criteria2 especifica un valor. La cadena puede ser una de las comparaciones de la tabla para Test1.
Criteria2 Optional Cadena Valor de la segunda comparación con el valor del campo especificado por FieldName.

Cadenas de comparación

Cadena de comparación Descripción
"igual a" El valor de FieldName es igual a Criteria1.
"diferente de" El valor de FieldName es diferente de Criteria1.
"mayor que" El valor de FieldName es mayor que Criteria1.
"mayor o igual que" El valor de FieldName es mayor o igual que Criteria1.
"menor que" El valor de FieldName es menor que Criteria1.
"Menor o igual que" El valor de FieldName es menor o igual que Criteria1.
"está comprendido en" El valor de FieldName está comprendido en Criteria1.
"no está comprendido en" El valor de FieldName no está comprendido en Criteria1.

Valor devuelto

Boolean

Comentarios

Para activar o desactivar la característica Autofiltro, vea el método AutoFilter.

Nota:

Un nombre de columna en una vista de hoja puede tener un título diferente que el nombre del campo que muestra.

Ejemplo:

En el siguiente ejemplo se establece un Autofiltro personalizado para el campo "% trabajo completado".

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

Si hay un autofiltro establecido para el campo "% de trabajo completado", la siguiente línea de código borra el Autofiltro porque el valor predeterminado para el argumento FilterType opcional es pjAutoFilterClear.

Application.SetAutoFilter FieldName:="% Work Complete"

Soporte técnico y comentarios

¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.