Compartilhar via


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.