Метод 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 и обратная связь.