Propriedade MailMergeDataSource.Included (Publisher)
True se um registro é incluído em uma mala direta. Boolean de leitura/gravação.
Sintaxe
expressão. Incluído
Expressão Uma variável que representa um objeto MailMergeDataSource .
Valor de retorno
Booliano
Comentários
Use o método SetAllIncludedFlags para definir o status incluído de todos os registros de mala direta.
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.