Método Application.FilterEdit (Project)

Cria, edita ou copia um filtro.

Sintaxe

expressão. FilterEdit (Name, TaskFilter, Create, OverwriteExisting, Parenthesis, NewName, FieldName, NewFieldName, Test, Value, Operation, ShowInMenu, ShowSummaryTasks)

expressão Uma variável que representa um Aplicativo objeto.

Parâmetros

Nome	Obrigatório/Opcional	Tipo de dados	Descrição
Name	Obrigatório	String	O nome de um filtro a ser editado, criado ou copiado.
TaskFilter	Obrigatório	Boolean	True se o filtro especificado com nome contém informações sobre a tarefa. False se o filtro contém informações sobre o recurso.
Create	Opcional	Boolean	True se um novo filtro é criado. O novo filtro é uma cópia do filtro especificado com o nome e receberá o nome especificado em NewName. Se NewName estiver vazia, o novo filtro receberá o nome especificado por Name. O valor padrão é False.
OverwriteExisting	Opcional	Boolean	True se o filtro existente será sobrescrito com um novo filtro. O valor padrão é False.
Parenthesis	Opcional	Boolean	True se o critério estabelecido por FieldName, Test e Value é avaliado como uma cláusula entre parênteses de AND ou OR (o valor especificado com a operação) em relação a outro critério, da seguinte forma (AND b) OR c.
Newname	Opcional	String	Um novo nome para o filtro especificado com Nome (Criar é False) ou um nome para o novo filtro (Criar é True). Se NewName está vazio e Create for False, o filtro especificado com o nome manterá seu nome atual. O valor padrão é Vazio.
FieldName	Opcional	String	O nome de um campo a ser alterado.
NewFieldName	Opcional	String	Um novo nome para o campo especificado em FieldName.
Test	Obrigatório	String	O tipo de comparação feita entre FieldName e Value que age como um critério de seleção do filtro. Pode ser uma das cadeias de caracteres de comparação.
Valor	Opcional	String	O valor com o qual comparar o valor do campo especificado em FieldName.
Operação	Opcional	String	Como o critério estabelecido por FieldName, Test e Value relaciona-se com o filtro. O argumento Operation pode ser definido como "And" ou "Or".
ShowInMenu	Opcional	Boolean	True se o filtro é exibido na lista suspensa filtro. O valor padrão é False. Nota Para exibir a lista de filtros, na Faixa de Opções, na guia Exibição , clique na lista suspensa Filtro .
ShowSummaryTasks	Opcional	Boolean	True se as tarefas de resumo das tarefas filtradas são exibidas. O valor padrão é False.

Cadeias de caracteres de comparação

Cadeia de comparação	Descrição
"é igual a"	O valor de FieldName é igual ao de Value.
"é diferente de"	O valor de FieldName não é igual a Value.
"é maior que"	O valor de FieldName é maior que o de Value.
"é maior ou igual a"	O valor de FieldName é maior ou igual ao de Value.
"é menor que"	O valor de FieldName é menor que o de Value.
"é menor ou igual a"	O valor de FieldName é menor ou igual ao de Value.
"está contido em"	O valor de FieldName está contido em Value.
"não está contido em"	O valor de FieldName não está contido em Value.
"contém"	FieldName contém Valor.
"não contém"	FieldName não contém Valor.
"contém exatamente"	FieldName contém exatamente Value.

Valor de retorno

Boolean

Exemplo

O exemplo a seguir cria um filtro (se não existir) para tarefas com a maior prioridade e, em seguida, aplica o 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    

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.