This example inserts an ADDIN field at the insertion point in the active document and then sets the data for the field.
Selection.Collapse Direction:=wdCollapseStart
Set myField = ActiveDocument.Fields.Add(Range:=Selection.Range, _
Type:=wdFieldAddin)
myField.Data = "Hidden information"