Fields Property

expression.Fields

expression    Required. An expression that returns one of the objects in the Applies To list.

Example

This example bolds the first field in the first shape on the first page of the active publication.

Sub CountFields()
    ActiveDocument.Pages(1).Shapes(1).TextFrame _
        .TextRange.Fields(1).TextRange.Font.Bold = msoTrue
End Sub