Objet MailMergeFilters (Publisher)

  • Article

Représente tous les filtres à appliquer à la source de données liée à la fusion et publipostage ou de la publication de fusion de catalogue. L’objet MailMergeFilters est composé d’objets MailMergeFilterCriterion .

Remarques

Utilisez la méthode Add pour ajouter un nouveau critère de filtre à la requête.

Utilisez l' élément méthode pour accéder à un critère de filtre individuel.

Exemple

Cet exemple ajoute une nouvelle ligne à la chaîne de requête et applique ensuite le filtre combiné à la source de données. Cet exemple suppose qu'une source de données est liée à la composition active.

Sub FilterDataSource() 
 With ActiveDocument.MailMerge.DataSource 
 .Filters.Add Column:="Region", _ 
 Comparison:=msoFilterComparisonIsBlank, _ 
 Conjunction:=msoFilterConjunctionAnd 
 .ApplyFilter 
 End With 
End Sub

Cet exemple montre comment parcourir tous les critères de filtre et, s’il en trouve un avec la valeur Region, le modifie pour supprimer de la fusion et publipostage tous les enregistrements qui ne sont pas égaux à WA. Cet exemple suppose qu'une source de données est liée à la composition active.

Sub SetQueryCriterion() 
 Dim intItem As Integer 
 With ActiveDocument.MailMerge.DataSource.Filters 
 For intItem = 1 To .Count 
 With .Item(intItem) 
 If .Column = "Region" Then 
 .Comparison = msoFilterComparisonNotEqual 
 .CompareTo = "WA" 
 If .Conjunction = "Or" Then .Conjunction = "And" 
 End If 
 End With 
 Next 
 End With 
End Sub

Méthodes

Propriétés

Voir aussi

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.