通过

MailMergeDataSource.InvalidComments Property

  • 项目
Word Developer Reference

If the InvalidAddress property is True, returns or sets a String that describes an invalid address error. Read/write.

Syntax

expression.InvalidComments

expression   A variable that represents a MailMergeDataSource object.

Remarks

Use the SetAllErrorFlags method to set both the InvalidAddress and InvalidComments properties for all records in a data source.

Example

This example loops through the records in the mail merge data source and checks whether the ZIP Code field (in this case field number six) contains fewer than five digits. If a record does contain a ZIP Code of fewer than five digits, the record is excluded from the mail merge, the address is marked as invalid, and a comment about why the record was excluded is added.

Visual Basic for Applications 
  Sub ExcludeRecords()

Dim intCount As Integer

On Error Resume Next

With ActiveDocument.MailMerge.DataSource
    .ActiveRecord = wdFirstRecord
    Do
        intCount = intCount + 1
        'Counts the number of digits in the postal code field and if
        'it is fewer than 5, the record is excluded from the mail merge,
        'marked as having an invalid address, and given a comment
        'describing why the postal code was removed
        If Len(.DataFields(6).Value) < 5 Then
            .Included = False
            .InvalidAddress = True
            .<strong class="bterm">InvalidComments</strong> = "The ZIP Code for this record" &amp; _
                "has fewer than five digits. It will be" &amp; _
                "removed from the mail merge process."
        End If

        .ActiveRecord = wdNextRecord
    Loop Until intCount &gt;= .ActiveRecord
End With



End Sub

See Also