Метод TextRange.InsertMailMergeField (Publisher)

Возвращает объект TextRange , представляющий текстовое поле данных для слияния почты или слияния каталога.

Синтаксис

expression. InsertMailMergeField (varIndex)

Выражение Переменная, представляющая объект TextRange .

Параметры

Имя Обязательный или необязательный Тип данных Описание
varIndex Обязательный Variant Имя или индекс поля данных в источнике данных.

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

TextRange

Замечания

Чтобы область слияния каталога публикации содержала текстовые поля данных, она должна сначала содержать по крайней мере одно текстовое поле, содержащее текстовые поля данных.

Пример

В этом примере поле LastName вставляется в положение курсора. В этом примере предполагается, что активная публикация является публикацией слиянием, а позиция курсора находится где-то внутри текстового поля.

Sub InsertMergeField() 
 Selection.TextRange.InsertMailMergeField varIndex:="LastName" 
End Sub

В этом примере текстовое поле добавляется в область слияния каталога указанной публикации, а затем вставляется текстовое поле данных в текстовое поле. В этом примере предполагается, что указанная публикация подключена к источнику данных и содержит область слияния каталога.

Set pbTextBox1 = ThisDocument.Pages(1).Shapes.AddTextbox(1, 100, 100, 175, 25) 
pbTextBox1.AddToCatalogMergeArea 
 
With pbTextBox1.TextFrame.TextRange 
 .Text = "List Price: " 
 .InsertMailMergeField "List Price" 
End With 

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

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