Klasse MailMergeDataField (Word VBA)

Die Klasse MailMergeDataField stellt ein einzelnes Seriendruckfeld in einer Datenquelle dar. Um eine MailMergeDataField -Klassenvariable zu verwenden, muss sie zuerst instanziert werden, beispielsweise

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

For Each

Hier ist ein Beispiel für die Verarbeitung der MailMergeDataField -Elemente in einer Sammlung

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

Index

Gibt einen Wert vom Typ Long zurück, der die Position eines Elements in einer Auflistung darstellt.

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

Name

Gibt den Namen des angegebenen Objekts zurück.

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

Value

Gibt den Inhalt des Felds Seriendruckdaten oder zugeordnete Daten für den aktuellen Datensatz zurück.

Verwenden Sie die ActiveRecord -Eigenschaft, um den aktiven Datensatz in einer Seriendruck-Datenquelle festzulegen.

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