Propriedade MailMergeFilterCriterion.CompareTo (Publisher)

Retorna ou define um String que representa o texto a ser comparado no critério de filtro de consulta. Leitura/gravação.

Sintaxe

expressão. Compareto

Expressão Uma variável que representa um objeto MailMergeFilterCriterion .

Valor de retorno

Cadeia de caracteres

Exemplo

O exemplo a seguir altera um filtro existente para remover do email mesclar todos os registros que não têm um campo Region igual a WA. Este exemplo pressupõe que uma fonte de dados de mala direta está anexada à publicação ativa.

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

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.