PivotFilters.Add, méthode (Excel)
Cette méthode ajoute de nouveaux filtres à la collection PivotFilters.
Syntaxe
expression. Add (Type, DataField, Value1, Value2, Order, Name, Description, MemberPropertyField, WholeDayFilter)
Expression Variable qui représente un objet PivotFilters .
Parameters
Nom | Requis/Facultatif | Type de données | Description |
---|---|---|---|
Type | Requis | XlPivotFilterType | Nécessite un type de filtre XlPivotFilterType . |
DataField | Facultatif | Variant | Champ auquel le filtre est attaché. |
Value1 | Facultatif | Variant | Valeur de filtre 1. |
Value2 | Facultatif | Variant | Valeur de filtre 2. |
Order | Facultatif | Variant | Ordre dans lequel les données doivent être filtrées. |
Name | Facultatif | Variant | Nom du filtre. |
Description | Facultatif | Variant | Brève description du filtre. |
MemberPropertyField | Facultatif | Variant | Spécifie le champ de propriétés de membre sur lequel repose le filtre d'étiquettes. |
WholeDayFilter | Facultatif | Variant | Spécifie un filtre basé sur les jours. |
Valeur renvoyée
Pivotfilter
Exemple
Les exemples ci-dessous montrent comment utiliser correctement la fonction Add.
ActiveCell.PivotField.PivotFilters.Add FilterType := xlThisWeek
ActiveCell.PivotField.PivotFilters.Add FilterType := xlTopCount DataField := MyPivotField2 Value1 := 10
ActiveCell.PivotField.PivotFilters.Add FilterType := xlCaptionIsNotBetween Value1 := "A" Value2 := "G"
ActiveCell.PivotField.PivotFilters.Add FilterType := xlValueIsGreaterThanOrEqualTo DataField := MyPivotField2 Value1 := 10000
L'exemple suivant renvoie une erreur d'exécution du fait que le type de données de Valeur1 n'est pas valide.
ActiveCell.PivotField.PivotFilters.Add FilterType := xlValueIsGreaterThanOrEqualTo DataField := MyPivotField2 Value1 := Allan
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.