将一个 IF 域添加到邮件合并主文档。 返回一个 MailMergeField 对象。
语法
expression。 AddIf( _Range_ , _MergeField_ , _Comparison_ , _CompareTo_ , _TrueAutoText_ , _TrueText_ , _FalseAutoText_ , _FalseText_ )
expression 是必需的。 一个代表“MailMergeFields”集合的变量。
参数
| 名称 | 必需/可选 | 数据类型 | 说明 |
|---|---|---|---|
| Range | 必需 | Range object | IF 域的位置。 |
| MergeField | 必需 | String | 合并域的名称。 |
| Comparison | 必需 | WdMailMergeComparison | 在比较中使用的操作符。 |
| CompareTo | 可选 | Variant | 与 MergeField 的内容进行比较的文字。 |
| TrueAutoText | 可选 | Variant | 比较结果为 True 时插入的"自动图文集"词条。 如果指定该参数，则将忽略 TrueText。 |
| TrueText | 可选 | Variant | 比较结果为 True 时插入的文字。 |
| FalseAutoText | 可选 | Variant | 比较结果为 False 时插入的"自动图文集"词条。 如果指定该参数，则将忽略 FalseText。 |
| FalseText | 可选 | Variant | 比较结果为 False 时插入的文字。 |
返回值
MailMergeField
备注
更新时，IF 域将记录中的域与指定值进行比较，然后根据比较结果插入相应文本。
示例
本示例实现的功能是：如果 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"
另请参阅
支持和反馈
有关于 Office VBA 或本文档的疑问或反馈？ 请参阅 Office VBA 支持和反馈，获取有关如何接收支持和提供反馈的指南。