MailMergeFields.Add (Word)

Devuelve un objeto MailMergeField que representa un campo de combinación de correspondencia agregado al documento del origen de datos.

Add (Range, Name)

ActiveDocument.MailMerge.Fields.Add Range:=Selection.Range, _ 
 Name:="MiddleInitial"

Arguments

Estos son los argumentos con nombre :

Range (Range) - Intervalo donde desea que aparezca el campo.

Name (String) - Nombre del campo.