Méthode MailMergeDataField.AddToRecipientFields (Publisher)
Ajoute l'objet parent MailMergeDataField à partir d'une source de données particulière à la source de données master (collection de champs de données) pour une composition de fusion et publipostage.
Syntaxe
expression. AddToRecipientFields
Expression Variable qui représente un objet MailMergeDataField .
Remarques
Cette méthode fonctionne uniquement si l'objet parent MailMergeDataField n'a pas déjà été mappé à un champ de destinataire. Utilisez la propriété IsMapped pour déterminer si l’objet a déjà été mappé.
Exemple
Le suivant Microsoft Visual Basic pour Applications (VBA) montre comment utiliser la méthode AddToRecipientFields pour ajouter un champ de données (colonne) dans une source de données particulière à la source de données master (liste des destinataires combinés) pour la composition.
Avant d’exécuter cette macro, remplacez par datasourceindex
le numéro d’index d’une source de données valide dans la collection de sources de données du document actif, puis remplacez par fieldname
le nom du champ dans la source de données que vous souhaitez ajouter à la liste combinée des champs de destinataire.
Remarque
Pour obtenir un exemple montrant comment utiliser la propriété Name de l’objet DataSource pour déterminer le numéro d’index de la source de données souhaitée, consultez la méthode MailMergeDataSources.Item .
Public Sub AddToRecipientFields_Example()
Dim pubMailMergeDataSources As Publisher.MailMergeDataSources
Dim pubMailMergeDataField As Publisher.MailMergeDataField
Set pubMailMergeDataSources = ThisDocument.MailMerge.DataSource.DataSources
Set pubMailMergeDataField = pubMailMergeDataSources.Item(datasourceindex).DataFields.Item("fieldname")
If pubMailMergeDataField.IsMapped Then
Debug.Print "This field is already mapped!"
Else
pubMailMergeDataField.AddToRecipientFields
Debug.Print "Field added successfully. (You can verify this by looking at the recipient or product list in the UI.)"
End If
End Sub
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.