Propriété MappedDataField.DataFieldName (Word)

  • Article

Définit ou renvoie une chaîne qui représente le nom du champ dans la source de données de fusion et publipostage auquel se mappe un champ de données mappé. Lecture-écriture.

Syntaxe

expression. DataFieldName

Expression Expression qui renvoie un objet « MappedDataField ».

Remarques

Une chaîne vide est renvoyée si le champ de données spécifié n'est associé à aucun champ de données mappé.

Exemple

Cet exemple montre comment créer une liste tabulée des champs de données mappés disponibles dans Word et des champs de la source de données auxquels ils sont associés. Il présuppose que le document actif est un document de publipostage et que les champs de source de données sont associés à des champs de données mappés.

Sub MappedFields() 
 Dim intCount As Integer 
 Dim docCurrent As Document 
 Dim docNew As Document 
 
 On Error Resume Next 
 
 Set docCurrent = ActiveDocument 
 Set docNew = Documents.Add 
 
 'Add leader tab to new document 
 docNew.Paragraphs.TabStops.Add _ 
 Position:=InchesToPoints(3.5), _ 
 Leader:=wdTabLeaderDots 
 
 With docCurrent.MailMerge.DataSource 
 
 'Insert heading paragraph for tabbed columns 
 docNew.Content.InsertAfter "Word Mapped Data Field" _ 
 & vbTab & "Data Source Field" 
 
 Do 
 intCount = intCount + 1 
 
 'Insert Word mapped data field name and the 
 'corresponding data source field name 
 docNew.Content.InsertAfter .MappedDataFields( _ 
 Index:=intCount).Name & vbTab & _ 
 .MappedDataFields(Index:=intCount) _ 
 .DataFieldName 
 
 'Insert paragraph 
 docNew.Content.InsertParagraphAfter 
 Loop Until intCount = .MappedDataFields.Count 
 
 End With 
 
End Sub

Voir aussi

Objet MappedDataField

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.