通过

MailMergeFilterCriterion.Comparison 属性 (Publisher)

  • 项目

返回或设置一个 MsoFilterComparison 常量，该常量表示如何比较 Cell.Column 和 CompareTo 属性。 读/写。

语法

表达式。比较

表达 一个代表 MailMergeFilterCriterion 对象的变量。

返回值

MsoFilterComparison

备注

Comparison 属性值可以是 Microsoft Office 类型库中声明的 MsoFilterComparison 常量之一。

示例

以下示例将现有筛选器更改为从邮件合并中删除所有没有“区域”字段等于 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 intItem 
 End With 
End Sub

支持和反馈

有关于 Office VBA 或本文档的疑问或反馈？ 请参阅 Office VBA 支持和反馈，获取有关如何接收支持和提供反馈的指南。