Méthode TextRange.InsertMailMergeField (Publisher)

Renvoie un objet TextRange qui représente un champ de données texte pour un publipostage ou une fusion de catalogue.

Syntaxe

expression. InsertMailMergeField (varIndex)

expression Variable qui représente un objet TextRange .

Paramètres

Valeur renvoyée

TextRange

Remarques

Pour qu’une zone de fusion de catalogue d’une composition puisse contenir des champs de données textuelles, elle doit d’abord comporter au moins une zone de texte pour contenir les champs de données textuelles.

Exemple

Cet exemple insère un champ LastName à la position du curseur. Cela suppose que la composition active est de type publipostage et que le point d'insertion se situe à l'intérieur d'une zone de texte.

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

Cet exemple montre comment ajouter une zone de texte à la zone de fusion de catalogue de la composition spécifiée, puis insérer un champ texte dans la zone de texte. Pour cela, nous supposons que la composition spécifiée est connectée à une source de données, et qu'elle contient une zone de fusion de catalogue.

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 

Assistance et commentaires

Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.