SetAllErrorFlags 方法

       

将邮件合并数据源中的所有记录标记为地址域中包含无效数据。

expression.SetAllErrorFlags(Invalid, InvalidComment)

expression   必需。该表达式返回一个 MailMergeDataSource 对象。

Invalid  Boolean 类型,必需。如果为 True,则将邮件合并数据源中的所有记录标记为无效。

InvalidComment  String 类型,必需。说明无效设置的文本。

说明

通过使用 InvalidAddressInvalidComments 属性,您可以单独标记地址域中包含无效数据的数据源记录。

示例

本示例将数据源中的所有记录标记为包含无效数据的地址域,并设置备注,说明无效的原因,再从邮件合并中排除所有记录。

Sub FlagAllRecords()
    With ActiveDocument.MailMerge.DataSource
        .SetAllErrorFlags Invalid:=True, InvalidComment:= _
            "All records in the data source have only 5-" _
            & "digit zip codes.  Need 5+4 digit zip codes."
        .SetAllIncludedFlags Included:=False
    End With
End Sub