Méthode Application.SetAutoFilter (Project)

Article
04/07/2023

Définit les critères d’un filtre automatique pour un champ spécifié dans une vue feuille.

Syntaxe

expression. SetAutoFilter (FieldName, FilterType, Test1, Criteria1, Operation, Test2, Criteria2)

Expression Expression qui renvoie un objet Application .

Parameters

Nom	Requis/Facultatif	Type de données	Description
FieldName	Requis	String	Nom du champ.
FilterType	Facultatif	PjAutoFilterType	Type de filtre ; peut être l’une des constantes PjAutoFilterType . La valeur par défaut est pjAutoFilterClear, ce qui efface le filtre automatique.
Test1	Facultatif	String	Spécifie le type de comparaison du premier test. Exige que FilterType soit pjAutoFilterCustom et que Criteria1 spécifie une valeur. Il peut s’agir de l’une des chaînes de comparaison.
Criteria1	Facultatif	String	Valeur de la première comparaison avec la valeur du champ spécifié par FieldName.
Opération	Facultatif	String	Opération logique en cas de second test. Operation peut avoir la valeur « And » ou « Or ».
Test2	Facultatif	String	Spécifie le type de comparaison du second test. Exige que FilterType soit pjAutoFilterCustom, que la valeur Operation doit être définie et que Criteria2 spécifie une valeur. Il peut s’agir de l’une des chaînes de comparaison du tableau Test1.
Criteria2	Facultatif	String	Valeur de la seconde comparaison avec la valeur du champ spécifié par FieldName.

Chaînes de comparaison

Chaîne de comparaison	Description
« égal à »	La valeur de FieldName est égale à celle de Criteria1.
« Différent de »	La valeur de FieldName est différente de celle de Criteria1.
« Supérieur à »	La valeur de FieldName est supérieure à celle de Criteria1.
« Supérieur ou égal à »	La valeur de FieldName est supérieure ou égale à celle de Criteria1.
« Inférieur à »	La valeur de FieldName est inférieure à celle de Criteria1.
« Inférieur ou égal à »	La valeur de FieldName est inférieure ou égale à celle de Criteria1.
« Compris entre »	La valeur de FieldName est comprise dans celle de Criteria1.
« Non compris dans »	La valeur de FieldName n’est pas comprise dans celle de Criteria1.

Valeur renvoyée

Boolean

Remarques

Pour activer ou désactiver la fonctionnalité Filtre automatique, consultez la méthode Filtre automatique .

Remarque

Dans un affichage Tableau, le nom d’une colonne peut avoir un titre différent du nom du champ affiché.

Exemple

L’exemple suivant définit un filtre automatique personnalisé pour le champ « % 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

Si un filtre automatique est défini pour le champ « % Work Complete », la ligne de code suivante efface le filtre automatique car la valeur par défaut de l’argument FilterType facultatif est pjAutoFilterClear.

Application.SetAutoFilter FieldName:="% Work Complete"

Assistance et commentaires

Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.

Partager via