expression.Included
expression Required. An expression that returns one of the objects in the Applies To list.
Remarks
Use the SetAllIncludedFlags method to set the included status for all mail merge records.
Example
This example searches the records to verify that the length of the PostalCode field for each record is at least five digits long. If it is not, the record is excluded from the mail merge and flagged as invalid.
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