AddIf 方法

       

将一个 IF 域添至邮件合并主文档。返回一个 MailMergeField 对象。更新时,IF 域将数据记录中的域与一个特定值进行比较,然后根据比较结果插入相应文本。

expression.AddIf(Range, MergeField, Comparison, CompareTo, TrueAutoText, TrueText, FalseAutoText, FalseText)

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

Range   Range 对象,必需。指 IF 域的位置。

MergeField   String 类型,必需。合并域的名称。

Comparison  WdMailMergeComparison,必需。在比较中使用此操作符。

CompareTo   Variant 类型,可选。指与 MergeField 中的内容进行比较的文字。

TrueAutoText   Variant 类型,可选。比较结果为 True 时所插入的“自动图文集”词条。如果指定该参数,则将忽略 TrueText

TrueText   Variant 类型,可选。比较结果为 True 时插入的文字。

FalseAutoText   Variant 类型,可选。比较结果为 False 时插入的“自动图文集”词条。如果指定该参数,则将忽略 FalseText

FalseText   Variant 类型,可选。比较结果为 False 时插入的文字。

示例

本示例实现的功能是:如果 Company 合并域为空,则插入“For your personal use”;如果 Company 合并域非空,则插入“for your business”。

ActiveDocument.MailMerge.Fields.AddIf Range:=Selection.Range, _
    MergeField:="Company", Comparison:=wdMergeIfIsBlank, _
    TrueText:="for your personal use", _
    FalseText:="for your business"