Word VBA教程:SetAllErrorFlags方法

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

expression.SetAllErrorFlags(Invalid, InvalidComment)

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

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

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

说明

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

VBA示例

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


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

Word VBA教程

Word VBA参考教程:目录1 Word VBA参考教程:目录2
Word VBA参考教程:目录3 Word VBA参考教程:目录4
Word VBA参考教程:目录5 Word VBA参考教程:目录6
Word VBA参考教程:目录7 Word VBA参考教程:目录8
Word VBA参考教程:目录9 Word VBA参考教程:目录10
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号