Свойство MailMergeFilterCriterion.Comparison (Publisher)

Статья
04/07/2023

Возвращает или задает константу MsoFilterComparison , представляющую способ сравнения свойств Cell.Column и CompareTo . Для чтения и записи.

Синтаксис

expression. Сравнение

Выражение Переменная, представляющая объект MailMergeFilterCriterion .

Возвращаемое значение

MsoFilterComparison

Замечания

Значение свойства Comparison может быть одной из констант MsoFilterComparison , объявленных в библиотеке типов Microsoft Office.

Пример

В следующем примере изменяется существующий фильтр, чтобы удалить из слияния все записи, не имеющие поля Регион, равные 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 и обратная связь.

Поделиться через