Поделиться через


Метод MailMergeFields.AddAsk (Word)

Добавляет поле ASK в основной документ слияния. Возвращает объект MailMergeField .

Синтаксис

выражение. AddAsk( _Range_ , _Name_ , _Prompt_ , _DefaultAskText_ , _AskOnce_ )

выражение (обязательно). Переменная, представляющая коллекцию MailMergeFields.

Параметры

Имя Обязательный или необязательный Тип данных Описание
Range Обязательный Объект Range Расположение поля ASK.
Name Обязательный String Имя закладки, которому назначается ответ или текст по умолчанию. Используйте поле REF с именем закладки для отображения результата в документе.
Prompt Необязательный Variant Текст, отображаемый в диалоговом окне.
DefaultAskText Необязательный Variant Ответ по умолчанию, который отображается в текстовом поле при отображении диалогового окна. Соответствует параметру \d для поля ASK.
AskOnce Необязательный Variant Значение true , чтобы диалоговое окно отображалось только один раз, а не при каждом слиянии новой записи. Соответствует параметру \o для поля ASK.

Возвращаемое значение

MailMergeField

Замечания

При обновлении в поле ASK отображается диалоговое окно, в котором предлагается назначить текст указанной закладке.

Пример

В этом примере поле ASK добавляется в конец основного документа активного слияния.

Dim rngTemp As Range 
 
Set rngTemp = ActiveDocument.Content 
 
rngTemp.Collapse Direction:=wdCollapseEnd 
ActiveDocument.MailMerge.Fields.AddAsk _ 
 Range:=rngTemp, _ 
 Prompt:="Type your company name", _ 
 Name:="company", AskOnce:=True

В этом примере поле ASK добавляется после последнего поля слияния в Main.doc.

Dim colMailMergeFields As Object 
Dim rngTemp As Range 
 
Set colMailMergeFields = Documents("Main.doc").MailMerge.Fields 
 
colMailMergeFields(colMailMergeFields.Count).Select 
 
Set rngTemp = Selection.Range 
 
rngTemp.Collapse wdCollapseEnd 
colMailMergeFields.AddAsk Range:=rngTemp, Name:="name", _ 
 Prompt:="What is your name"

См. также

Объект коллекции MailMergeFields

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.