差し込み印刷のメイン文書に FILLIN フィールドを追加します。 MailMergeField オブジェクトを返します。
構文
expression. AddFillIn
( _Range_
, _Prompt_
, _DefaultFillInText_
, _AskOnce_
)
expression 必須です。 'MailMergeFields' コレクションを表す変数。
パラメーター
名前 | 必須 / オプション | データ型 | 説明 |
---|---|---|---|
Range | 必須 | Range object | FILLIN フィールドの位置を指定します。 |
Prompt | 省略可能 | バリアント型 (Variant) | ダイアログ ボックスに表示する文字列を指定します。 |
DefaultFillinText | 省略可能 | バリアント型 (Variant) | ダイアログ ボックスのテキスト ボックスに表示する既定の文字列を指定します。 FILLIN フィールドの \d スイッチに対応します。 |
AskOnce | 省略可能 | バリアント型 (Variant) | True 新しいレコードが差し込まれるたびに 1 回だけメッセージを表示します。 FILLIN フィールドの \o スイッチに対応します。 既定値は False です。 |
戻り値
MailMergeField
注釈
更新されると、FILLIN フィールドは、文書の FILL-IN フィールドの位置に挿入するテキストの入力を求めるダイアログ ボックスを表示します。 差し込み印刷のメイン文書以外の文書に FILLIN フィールドを追加するのには、 Fields コレクション オブジェクトで Add メソッドを使用します。
例
次の使用例は、"Name: " の後に挿入する名前を入力する FILLIN フィールドを追加します。
With Selection
.Collapse Direction:=wdCollapseStart
.InsertAfter "Name: "
.Collapse Direction:=wdCollapseEnd
End With
ActiveDocument.MailMerge.Fields.AddFillin Range:=Selection.Range, _
Prompt:="Your name?", DefaultFillInText:="Joe", AskOnce:=True
関連項目
サポートとフィードバック
Office VBA またはこの説明書に関するご質問やフィードバックがありますか? サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。