Propriedade MailMergeFilterCriterion.Comparison (Publisher)
Retorna ou define uma constante MsoFilterComparison que representa como comparar as propriedades Cell.Column e CompareTo . Leitura/gravação.
Sintaxe
expressão. Comparação
Expressão Uma variável que representa um objeto MailMergeFilterCriterion .
Valor de retorno
MsoFilterComparison
Comentários
O valor da propriedade Compar pode ser uma das constantes MsoFilterComparison declaradas na biblioteca de tipos do Microsoft Office.
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.