MailMergeFields.Add (Word)

Retorna um objeto MailMergeField que representa um campo de mala direta adicionado ao documento de fonte de dados.

Add (Range, Name)

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

Arguments

O seguinte argumento é opcional

Range (Range) - O intervalo onde você deseja que o campo apareça. Esse campo substitui o intervalo, caso o intervalo não esteja recolhido.

Name (String) - O nome do campo.