Publisher) (MailMergeFilters 物件

代表要套用至貼附至合併列印或型錄合併列印出版物的資料來源的所有篩選。 MailMergeFilters物件是由MailMergeFilterCriterion物件所組成。

註解

使用 Add 方法可將新的篩選準則新增至查詢。

使用 項目 若要存取個別的篩選準則的方法。

範例

本範例會將新的條件新增至查詢字串中，並將合併的篩選套用到資料來源。 本範例會假設為資料來源貼附至使用中出版物。

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

此範例會迴圈執行所有篩選準則，如果找到值為 Region 的篩選準則，請將它變更為從合併列印移除不等於 WA 的所有記錄。 本範例會假設為資料來源貼附至使用中出版物。

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

方法

• Add
• Delete
• 項目

屬性

• 應用程式
• 數目
• Creator
• Parent

另請參閱

• Publisher 物件模型參考

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎？ 如需取得支援服務並提供意見反應的相關指導，請參閱 Office VBA 支援與意見反應。