AddFillIn 方法

将一个 FILLIN 域添至邮件合并主文档。返回一个 MailMergeField 对象。在更新时，FILLIN 域将显示一个对话框，提示您应在文档 FILLIN 域所在位置插入文字。

注意   将 Add 方法用于 Fields 集合对象可将一个 FILLIN 域添至文档（而不是一个邮件合并主文档）。

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

Range   Range 对象，必需。指 FILLIN 域的位置。

Prompt   Variant 类型，可选。在对话框中显示的文字。

DefaultFillinText   Variant 类型，可选。指默认的应答，将在显示对话框时出现在文本框里。对应于 FILLIN 域的 \d 开关。

AskOnce   Variant 类型，可选。如果为 True，则只显示一次对话框，而不会在每次合并一个新的数据记录时都显示该对话框。对应于 FILLIN 域的 \o 开关。默认值为 False。

示例

本示例添加一个 FILLIN 域以提示在“Name:”后面插入一个姓名。

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