Propriedade MailMergeDataSource.InvalidComments (Publisher)

Se a propriedade InvalidAddress for True, essa propriedade retorna ou define uma cadeia de caracteres que descreve dados inválidos em um registro de mala direta. Leitura/gravação.

Sintaxe

expressão. InvalidComments

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

Valor de retorno

Cadeia de caracteres

Comentários

Use o método SetAllErrorFlags para definir as propriedades InvalidAddress e InvalidComments para todos os registros em uma fonte de dados.

Exemplo

Este exemplo procura todos os registros para verificar se o tamanho do campo PostalCode para cada registro tem, pelo menos, cinco dígitos. Se não tiver, o registro é excluído da mala direta e é marcado como inválido.

Sub ExcludeRecords() 
 Dim intRecord As Integer 
 With ActiveDocument.MailMerge 
 For intRecord = 1 To .DataSource.RecordCount 
 .DataSource.ActiveRecord = intRecord 
 If Len(.DataSource.DataFields("PostalCode").Value) < 5 Then 
 With .DataSource 
 .Included = False 
 .InvalidAddress = True 
 .InvalidComments = "This record is removed " & _ 
 "from the mail merge because its postal code" & _ 
 "has less than five digits." 
 End With 
 End If 
 Next 
 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.