Classe MailMergeDataField (Word VBA)

La classe MailMergeDataField représente un seul champ de fusion et publipostage dans une source de données. Pour utiliser une variable de classe MailMergeDataField, elle doit d'abord être instanciée, par exemple

Dim mmd as MailMergeDataField
Set mmd = ActiveDocument.MailMerge.DataSource.DataFields(Index:=1)

For Each

Voici un exemple de traitement des éléments MailMergeDataField dans une collection

Dim mmdDataField As MailMergeDataField
For Each mmdDataField In ActiveDocument.MailMerge.DataSource.DataFields
	
Next mmdDataField

Index

Renvoie un type long qui représente la position d'un élément dans une collection.

Dim lngIndex As Long
lngIndex = ActiveDocument.MailMerge.DataSource.DataFields(1).Index

Name

Retourne le nom de l'objet spécifié.

Dim strName As String
strName = ActiveDocument.MailMerge.DataSource.DataFields(1).Name

Value

Renvoie le contenu du champ de données de fusion et publipostage ou champ de données mappé pour l'enregistrement actif.

Utilisez la propriété ActiveRecord pour définir l'enregistrement actif dans une source de données de fusion et publipostage.

For Each dataF In _ 
 Documents("Main.doc").MailMerge.DataSource.DataFields 
 If dataF.Value <> "" Then dRecord = dRecord & _ 
 dataF.Value & vbCr 
Next dataF 
MsgBox dRecord