--- Fields Property Example

--- This example updates all the fields in the active document.

ActiveDocument.Fields.Update

--- This example removes all the fields from the main text story and the footer in the active document.

For Each aField in ActiveDocument.Fields

    aField.Delete

Next aField

Set myRange = ActiveDocument.Sections( 1 ).Footers _

    (wdHeaderFooterPrimary).Range

For Each aField In myRange.Fields

    aField.Delete

Next aField

--- This example adds a DATE field at the insertion point.

With Selection

    .Collapse Direction:=wdCollapseStart

    .Fields.Add Range:=Selection.Range, Type:=wdFieldDate

End With

--- This example adds a mail merge field named "Title" at the insertion point.

Selection.Collapse Direction:=wdCollapseStart

ActiveDocument.MailMerge.Fields.Add Range:= Selection.Range, _

    Name:= "Title"