Método Application.FilterEdit (Project)

Crea, edita o copia un filtro.

Sintaxis

expresión. FilterEdit (Name, TaskFilter, Create, OverwriteExisting, Parenthesis, NewName, FieldName, NewFieldName, Test, Value, Operation, ShowInMenu, ShowSummaryTasks)

expresión Variable que representa un objeto Application.

Parámetros

Nombre	Obligatorio/opcional	Tipo de datos	Descripción
Name	Obligatorio	String	Nombre del filtro que se va a modificar, crear o copiar.
TaskFilter	Obligatorio	Boolean	True si el filtro especificado por Name contiene información de la tarea. False si el filtro contiene información del recurso.
Create	Opcional	Boolean	True si se crea un nuevo filtro. El nuevo filtro es una copia del filtro especificado por Name y se le asigna el nombre especificado por NewName. Si NewName está vacío, el nuevo filtro se le asigna el nombre especificado por su nombre. El valor predeterminado es False.
Sobrescribir existente	Opcional	Boolean	True si se sobrescribe el filtro existente con un nuevo filtro. El valor predeterminado es False.
Parenthesis	Opcional	Boolean	True si el criterio establecido por FieldName, Test y Value se evalúa como una cláusula AND u OR entre paréntesis (el valor especificado con Operation) en relación con otros criterios, del modo (a AND b) OR c..
Newname	Opcional	Cadena	Un nuevo nombre para el filtro especificado con Name (Create es False) o un nombre para el nuevo filtro (Create is True). Si NewName es empty y Create es False, el filtro especificado por Name conserva su nombre actual. El valor predeterminado es Empty.
FieldName	Opcional	String	El nombre de un campo que se va a cambiar.
NewFieldName	Opcional	String	Nuevo nombre para el campo especificado por FieldName.
Test	Obligatorio	String	Tipo de comparación que se realiza entre FieldName y Value que actúa como criterio de selección del filtro. Puede ser una de las cadenas de comparación.
Valor	Opcional	Cadena	Valor que se va a comparar con el valor del campo especificado por FieldName.
Operación	Opcional	Cadena	Forma en que el criterio establecido por FieldName, Test y Value se relaciona con otros criterios del filtro. El valor del argumento Operation puede ser "And" u "Or".
ShowInMenu	Opcional	Boolean	True si el filtro se muestra en la lista desplegable de filtros. El valor predeterminado es False. Nota Para mostrar la lista de filtros, en la cinta de opciones, en la pestaña Ver , haga clic en la lista desplegable Filtro .
ShowSummaryTasks	Opcional	Boolean	True si se muestran las tareas de resumen de las tareas filtradas. El valor predeterminado es False.

Cadenas de comparación

Cadena de comparación	Descripción
"igual a"	El valor de FieldName es igual a Value.
"no es igual a"	El valor de FieldName no es igual a Value.
"es mayor que"	El valor de FieldName es mayor que Value.
"es mayor o igual que"	El valor de FieldName es mayor o igual que Value.
"es menor que"	El valor de FieldName es menor que Value.
"es menor o igual que"	El valor de FieldName es menor o igual que Value.
"está comprendido en"	El valor de FieldName está comprendido en Value.
"no está comprendido en"	El valor de FieldName no está comprendido en Value.
"contiene"	FieldName contiene Value.
"no contiene"	FieldName no contiene Value.
"contiene exactamente"	FieldName contiene exactamente Value.

Valor devuelto

Boolean

Ejemplo:

En el ejemplo siguiente se crea un filtro (si no existe) para las tareas con la prioridad más alta y, a continuación, se aplica el filtro.

Sub CreateAndApplyHighestPriorityFilter() 
    Dim TaskFilter As Variant  ' Index for For Each loop. 
    Dim Found As Boolean    ' Whether or not the filter exists. 
    Found = False   ' Assume the filter does not exist. 
    ' Look for filter. 
    For Each TaskFilter In ActiveProject.TaskFilterList 
        If TaskFilter = "Highest Priority" Then 
            Found = True 
            Exit For 
        End If 
    Next TaskFilter 
 
    ' If filter doesn't exist, create it. 
    If Not Found Then FilterEdit Name:="Highest Priority", _ 
        Create:=True, TaskFilter:=True, FieldName:="Priority", _ 
        Test:="equals", Value:="Highest" 
    FilterApply "Highest Priority" 
End Sub    

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.