差し込み印刷のメイン文書に IF フィールドを追加します。 MailMergeField オブジェクトを返します。
構文
expression. AddIf( _Range_ , _MergeField_ , _Comparison_ , _CompareTo_ , _TrueAutoText_ , _TrueText_ , _FalseAutoText_ , _FalseText_ )
expression 必須です。 'MailMergeFields' コレクションを表す変数。
パラメーター
| 名前 | 必須 / オプション | データ型 | 説明 |
|---|---|---|---|
| Range | 必須 | Range object | IF フィールドの位置を指定します。 |
| MergeField | 必須 | String | 差し込みフィールド名を指定します。 |
| Comparison | 必須 | WdMailMergeComparison | WdMailMergeComparison クラスの定数のいずれかを使用して、比較動作を指定します。 |
| CompareTo | 省略可能 | バリアント型 (Variant) | MergeField の内容と比較する文字列を指定します。 |
| TrueAutoText | 省略可能 | バリアント型 (Variant) | 比較結果が True である場合に挿入する定型句を指定します。 この引数を指定すると、TrueText は無効になります。 |
| TrueText | 省略可能 | バリアント型 (Variant) | 比較結果が True である場合に挿入する文字列を指定します。 |
| FalseAutoText | 省略可能 | バリアント型 (Variant) | 比較結果が False である場合に挿入する定型句を指定します。 この引数を指定すると、FalseText は無効になります。 |
| FalseText | 省略可能 | バリアント型 (Variant) | 比較結果が False である場合に挿入する文字列を指定します。 |
戻り値
MailMergeField
注釈
フィールドを更新すると、IF フィールドはレコードのフィールドと指定された値を比較し、比較結果に応じて適切な文字列を挿入します。
例
次の使用例は、差し込みフィールドである "会社名" が空白の場合は "個人用" を、空白でない場合は "会社用" を挿入します。
ActiveDocument.MailMerge.Fields.AddIf Range:=Selection.Range, _
MergeField:="Company", Comparison:=wdMergeIfIsBlank, _
TrueText:="for your personal use", _
FalseText:="for your business"
関連項目
サポートとフィードバック
Office VBA またはこの説明書に関するご質問やフィードバックがありますか？ サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。